object DtMEstoque: TDtMEstoque
  OldCreateOrder = False
  Left = 440
  Top = 109
  Height = 687
  Width = 919
  object ZEntrada_Documento: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateEnd
    SQL.Strings = (
      'SELECT *'
      'FROM ENTRADA_DOCUMENTO '
      'WHERE END_IDFDOCUMENTO = :IDF')
    Params = <
      item
        DataType = ftUnknown
        Name = 'IDF'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 288
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'IDF'
        ParamType = ptUnknown
      end>
    object ZEntrada_DocumentoEND_IDFDOCUMENTO: TIntegerField
      FieldName = 'END_IDFDOCUMENTO'
      Required = True
    end
    object ZEntrada_DocumentoEND_DOCUMENTO: TStringField
      FieldName = 'END_DOCUMENTO'
      Required = True
      Size = 13
    end
    object ZEntrada_DocumentoEND_DATAENTRADA: TDateField
      FieldName = 'END_DATAENTRADA'
      Required = True
    end
    object ZEntrada_DocumentoEND_DATAEMISSAO: TDateField
      FieldName = 'END_DATAEMISSAO'
      Required = True
    end
    object ZEntrada_DocumentoEND_EMPRESACODIGO: TSmallintField
      FieldName = 'END_EMPRESACODIGO'
      Required = True
    end
    object ZEntrada_DocumentoEND_CFOPCODIGO: TStringField
      FieldName = 'END_CFOPCODIGO'
      Required = True
      Size = 8
    end
    object ZEntrada_DocumentoEND_PEDIDO: TStringField
      FieldName = 'END_PEDIDO'
      Size = 13
    end
    object ZEntrada_DocumentoEND_LANCAMENTO: TStringField
      FieldName = 'END_LANCAMENTO'
      Required = True
      Size = 1
    end
    object ZEntrada_DocumentoEND_CANCELADO: TStringField
      FieldName = 'END_CANCELADO'
      Size = 1
    end
    object ZEntrada_DocumentoEND_CTRLINC: TStringField
      FieldName = 'END_CTRLINC'
    end
    object ZEntrada_DocumentoEND_PESSOAIDF: TIntegerField
      FieldName = 'END_PESSOAIDF'
      Required = True
    end
    object ZEntrada_DocumentoEND_USUARIO: TStringField
      FieldName = 'END_USUARIO'
      Size = 3
    end
    object ZEntrada_DocumentoEND_DATAREG: TDateTimeField
      FieldName = 'END_DATAREG'
    end
    object ZEntrada_DocumentoEND_USUALTER: TStringField
      FieldName = 'END_USUALTER'
      Size = 3
    end
    object ZEntrada_DocumentoEND_DATAALTER: TDateTimeField
      FieldName = 'END_DATAALTER'
    end
    object ZEntrada_DocumentoEND_SAIDA_TRANSFERENCIA: TIntegerField
      FieldName = 'END_SAIDA_TRANSFERENCIA'
    end
    object ZEntrada_DocumentoEND_NFE: TIntegerField
      FieldName = 'END_NFE'
    end
  end
  object ZEntrada_Produtos: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateEnp
    SQL.Strings = (
      'SELECT '
      '  ENP.ENP_IDFDOCUMENTO,'
      '  ENP.ENP_SEQITEMDOCUM,'
      '  ENP.ENP_EMPRESACODIGO,'
      '  ENP.ENP_IDFPRODUTO,'
      '  ENP.ENP_QUANTIDADE,'
      '  ENP.ENP_PRECOCOMPRA,'
      '  ENP.ENP_PRECOCUSTO,'
      '  ENP.ENP_PRECOVENDA,'
      '  ENP.ENP_PRECOATACADO,'
      '  ENP.ENP_VALIDADE,'
      '  ENP.ENP_LOTE,'
      '  ENP.ENP_CANCELADO,'
      '  ENP.ENP_DATHORA,'
      '  ENP.ENP_SITCOD,'
      '  ENP.ENP_IPICOD,'
      '  ENP.ENP_PISCOFINS,'
      '  ENP.ENP_PROMOCAO,'
      '  ENP.ENP_ATUALIZAPRECOS,'
      '  ENP.NFI_IDFNOTA,'
      '  ENP_PER_IPI,  '
      '  ENP_PER_FRETE,'
      '  ENP_PER_MARVAREJO,'
      '  ENP_PER_MARATACADO,'
      '  ENP_PER_ICM,  '
      '  ESP.ESP_CODIGO AS CODIGO,'
      '  ESP.ESP_DESCRI AS DESCRICAO,'
      '  ESP.ESP_CONTROLE AS CONTROLE'
      'FROM '
      '  ENTRADA_PRODUTOS ENP'
      'INNER JOIN'
      '  ESTOQUE_PRODUTO ESP'
      'ON'
      '  ESP.ESP_IDFCOD = ENP_IDFPRODUTO'
      'WHERE ENP_IDFDOCUMENTO = :IDFDOC'
      'ORDER BY ENP.ENP_SEQITEMDOCUM')
    Params = <
      item
        DataType = ftUnknown
        Name = 'IDFDOC'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 345
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'IDFDOC'
        ParamType = ptUnknown
      end>
    object ZEntrada_ProdutosENP_IDFDOCUMENTO: TIntegerField
      FieldName = 'ENP_IDFDOCUMENTO'
      Required = True
    end
    object ZEntrada_ProdutosENP_SEQITEMDOCUM: TSmallintField
      FieldName = 'ENP_SEQITEMDOCUM'
      Required = True
    end
    object ZEntrada_ProdutosENP_EMPRESACODIGO: TSmallintField
      FieldName = 'ENP_EMPRESACODIGO'
      Required = True
    end
    object ZEntrada_ProdutosENP_IDFPRODUTO: TIntegerField
      FieldName = 'ENP_IDFPRODUTO'
      Required = True
    end
    object ZEntrada_ProdutosENP_QUANTIDADE: TFloatField
      FieldName = 'ENP_QUANTIDADE'
      Required = True
    end
    object ZEntrada_ProdutosENP_PRECOCOMPRA: TFloatField
      FieldName = 'ENP_PRECOCOMPRA'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEntrada_ProdutosENP_PRECOCUSTO: TFloatField
      FieldName = 'ENP_PRECOCUSTO'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEntrada_ProdutosENP_PRECOVENDA: TFloatField
      FieldName = 'ENP_PRECOVENDA'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEntrada_ProdutosENP_PRECOATACADO: TFloatField
      FieldName = 'ENP_PRECOATACADO'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEntrada_ProdutosENP_VALIDADE: TDateField
      FieldName = 'ENP_VALIDADE'
    end
    object ZEntrada_ProdutosENP_LOTE: TIntegerField
      FieldName = 'ENP_LOTE'
    end
    object ZEntrada_ProdutosENP_CANCELADO: TStringField
      FieldName = 'ENP_CANCELADO'
      Required = True
      Size = 1
    end
    object ZEntrada_ProdutosENP_DATHORA: TDateTimeField
      FieldName = 'ENP_DATHORA'
    end
    object ZEntrada_ProdutosENP_SITCOD: TStringField
      FieldName = 'ENP_SITCOD'
      Size = 2
    end
    object ZEntrada_ProdutosENP_IPICOD: TStringField
      FieldName = 'ENP_IPICOD'
      Size = 2
    end
    object ZEntrada_ProdutosENP_PISCOFINS: TStringField
      FieldName = 'ENP_PISCOFINS'
      Size = 1
    end
    object ZEntrada_ProdutosENP_PROMOCAO: TStringField
      FieldName = 'ENP_PROMOCAO'
      Size = 1
    end
    object ZEntrada_ProdutosENP_ATUALIZAPRECOS: TStringField
      FieldName = 'ENP_ATUALIZAPRECOS'
      Size = 1
    end
    object ZEntrada_ProdutosNFI_IDFNOTA: TIntegerField
      FieldName = 'NFI_IDFNOTA'
    end
    object ZEntrada_ProdutosCODIGO: TStringField
      FieldName = 'CODIGO'
      Size = 13
    end
    object ZEntrada_ProdutosDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
    object ZEntrada_ProdutosCONTROLE: TStringField
      FieldName = 'CONTROLE'
      Size = 1
    end
    object ZEntrada_ProdutosENP_PER_IPI: TFloatField
      FieldName = 'ENP_PER_IPI'
    end
    object ZEntrada_ProdutosENP_PER_FRETE: TFloatField
      FieldName = 'ENP_PER_FRETE'
    end
    object ZEntrada_ProdutosENP_PER_MARVAREJO: TFloatField
      FieldName = 'ENP_PER_MARVAREJO'
    end
    object ZEntrada_ProdutosENP_PER_MARATACADO: TFloatField
      FieldName = 'ENP_PER_MARATACADO'
    end
    object ZEntrada_ProdutosENP_PER_ICM: TFloatField
      FieldName = 'ENP_PER_ICM'
    end
  end
  object ZUpdateEnd: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ENTRADA_DOCUMENTO'
      'WHERE'
      '  ENTRADA_DOCUMENTO.END_IDFDOCUMENTO = '
      ':OLD_END_IDFDOCUMENTO')
    InsertSQL.Strings = (
      'INSERT INTO ENTRADA_DOCUMENTO'
      
        '  (END_IDFDOCUMENTO,END_DOCUMENTO, END_DATAENTRADA, END_DATAEMIS' +
        'SAO, '
      'END_EMPRESACODIGO, END_CFOPCODIGO, END_PEDIDO, END_LANCAMENTO, '
      'END_CANCELADO, END_CTRLINC, '
      '   END_PESSOAIDF, END_USUARIO, END_DATAREG, '
      'END_USUALTER, END_DATAALTER)'
      'VALUES'
      
        '  (:END_IDFDOCUMENTO, :END_DOCUMENTO, :END_DATAENTRADA, :END_DAT' +
        'AEMISSAO, '
      
        ':END_EMPRESACODIGO, :END_CFOPCODIGO, :END_PEDIDO, :END_LANCAMENT' +
        'O, '
      
        ':END_CANCELADO, :END_CTRLINC, :END_PESSOAIDF, :END_USUARIO, :END' +
        '_DATAREG, '
      ':END_USUALTER, :END_DATAALTER)')
    ModifySQL.Strings = (
      'UPDATE ENTRADA_DOCUMENTO SET'
      '  END_DOCUMENTO = :END_DOCUMENTO,'
      '  END_DATAENTRADA = :END_DATAENTRADA,'
      '  END_DATAEMISSAO = :END_DATAEMISSAO,'
      '  END_EMPRESACODIGO = :END_EMPRESACODIGO,'
      '  END_CFOPCODIGO = :END_CFOPCODIGO,'
      '  END_PEDIDO = :END_PEDIDO,'
      '  END_LANCAMENTO = :END_LANCAMENTO,'
      '  END_CANCELADO = :END_CANCELADO,'
      '  END_CTRLINC = :END_CTRLINC,'
      '  END_PESSOAIDF = :END_PESSOAIDF,'
      '  END_USUARIO = :END_USUARIO,'
      '  END_DATAREG = :END_DATAREG,'
      '  END_USUALTER = :END_USUALTER,'
      '  END_DATAALTER = :END_DATAALTER,'
      '  END_NFE = :END_NFE'
      'WHERE'
      '  ENTRADA_DOCUMENTO.END_IDFDOCUMENTO = '
      ':OLD_END_IDFDOCUMENTO')
    UseSequenceFieldForRefreshSQL = False
    Left = 504
    Top = 288
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'END_DOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_DATAENTRADA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_DATAEMISSAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_EMPRESACODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_CFOPCODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_PEDIDO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_LANCAMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_CANCELADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_CTRLINC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_PESSOAIDF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_USUARIO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_DATAREG'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_USUALTER'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_DATAALTER'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_NFE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_END_IDFDOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'END_IDFDOCUMENTO'
        ParamType = ptUnknown
      end>
  end
  object ZUpdateEnp: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ENTRADA_PRODUTOS'
      'WHERE'
      '  ENTRADA_PRODUTOS.ENP_IDFDOCUMENTO = '
      ':OLD_ENP_IDFDOCUMENTO AND'
      '  ENTRADA_PRODUTOS.ENP_SEQITEMDOCUM = '
      ':OLD_ENP_SEQITEMDOCUM')
    InsertSQL.Strings = (
      'INSERT INTO ENTRADA_PRODUTOS'
      '  (ENP_IDFDOCUMENTO, ENP_SEQITEMDOCUM, '
      'ENP_EMPRESACODIGO, ENP_IDFPRODUTO, '
      '   ENP_QUANTIDADE, ENP_PRECOCOMPRA, ENP_PRECOCUSTO, '
      'ENP_PRECOVENDA, ENP_PRECOATACADO, '
      '   ENP_VALIDADE, ENP_LOTE, ENP_CANCELADO, ENP_DATHORA, '
      'ENP_SITCOD, ENP_IPICOD, '
      '   ENP_PISCOFINS, ENP_PROMOCAO, ENP_ATUALIZAPRECOS, '
      'NFI_IDFNOTA,  ENP_PER_IPI,  ENP_PER_FRETE,  '
      'ENP_PER_MARVAREJO, ENP_PER_MARATACADO,  ENP_PER_ICM)'
      'VALUES'
      '  (:ENP_IDFDOCUMENTO, :ENP_SEQITEMDOCUM, '
      ':ENP_EMPRESACODIGO, :ENP_IDFPRODUTO, '
      '   :ENP_QUANTIDADE, :ENP_PRECOCOMPRA, :ENP_PRECOCUSTO, '
      ':ENP_PRECOVENDA, '
      '   :ENP_PRECOATACADO, :ENP_VALIDADE, :ENP_LOTE, '
      ':ENP_CANCELADO, :ENP_DATHORA, '
      '   :ENP_SITCOD, :ENP_IPICOD, :ENP_PISCOFINS, :ENP_PROMOCAO, '
      ':ENP_ATUALIZAPRECOS, '
      '   :NFI_IDFNOTA, :ENP_PER_IPI,  :ENP_PER_FRETE,  '
      ':ENP_PER_MARVAREJO, :ENP_PER_MARATACADO,  :ENP_PER_IPI)')
    ModifySQL.Strings = (
      'UPDATE ENTRADA_PRODUTOS SET'
      '  ENP_EMPRESACODIGO = :ENP_EMPRESACODIGO,'
      '  ENP_IDFPRODUTO = :ENP_IDFPRODUTO,'
      '  ENP_QUANTIDADE = :ENP_QUANTIDADE,'
      '  ENP_PRECOCOMPRA = :ENP_PRECOCOMPRA,'
      '  ENP_PRECOCUSTO = :ENP_PRECOCUSTO,'
      '  ENP_PRECOVENDA = :ENP_PRECOVENDA,'
      '  ENP_PRECOATACADO = :ENP_PRECOATACADO,'
      '  ENP_VALIDADE = :ENP_VALIDADE,'
      '  ENP_LOTE = :ENP_LOTE,'
      '  ENP_CANCELADO = :ENP_CANCELADO,'
      '  ENP_DATHORA = :ENP_DATHORA,'
      '  ENP_SITCOD = :ENP_SITCOD,'
      '  ENP_IPICOD = :ENP_IPICOD,'
      '  ENP_PISCOFINS = :ENP_PISCOFINS,'
      '  ENP_PROMOCAO = :ENP_PROMOCAO,'
      '  ENP_ATUALIZAPRECOS = :ENP_ATUALIZAPRECOS,'
      '  NFI_IDFNOTA = :NFI_IDFNOTA,'
      '  ENP_PER_IPI =:ENP_PER_IPI, '
      '  ENP_PER_FRETE =:ENP_PER_FRETE,'
      '  ENP_PER_MARVAREJO =:ENP_PER_MARVAREJO, '
      '  ENP_PER_MARATACADO =:ENP_PER_MARATACADO,'
      '  ENP_PER_ICM =:ENP_PER_ICM'
      'WHERE'
      '  ENTRADA_PRODUTOS.ENP_IDFDOCUMENTO = '
      ':OLD_ENP_IDFDOCUMENTO AND'
      '  ENTRADA_PRODUTOS.ENP_SEQITEMDOCUM = '
      ':OLD_ENP_SEQITEMDOCUM')
    UseSequenceFieldForRefreshSQL = False
    Left = 504
    Top = 346
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ENP_EMPRESACODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_IDFPRODUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_QUANTIDADE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PRECOCOMPRA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PRECOCUSTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PRECOVENDA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PRECOATACADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_VALIDADE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_LOTE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_CANCELADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_DATHORA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_SITCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_IPICOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PISCOFINS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PROMOCAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_ATUALIZAPRECOS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_IDFNOTA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PER_IPI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PER_FRETE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PER_MARVAREJO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PER_MARATACADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_PER_ICM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ENP_IDFDOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ENP_SEQITEMDOCUM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_IDFDOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENP_SEQITEMDOCUM'
        ParamType = ptUnknown
      end>
  end
  object ZQuerySaiProdutos: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpSaiProdutos
    SQL.Strings = (
      'SELECT '
      '  SAI.SAI_IDFDOC,'
      '  ESP.ESP_CODIGO SAI_CODREF,'
      '  ESP.ESP_DESCRI SAI_DESCRICAO,'
      '  SAI.SAI_SEQITEM,'
      '  SAI.SAI_IDFITEM,'
      '  SAI.SAI_PRECOM,'
      '  SAI.SAI_PRECUS,'
      '  SAI.SAI_PRETAB,'
      '  SAI.SAI_PREVEN,'
      '  SAI.SAI_QUANTI,'
      '  SAI.SAI_CANCEL,'
      '  SAI.SAI_ICMS,'
      '  SAI.SAI_GARANTIA,'
      '  SAI.SAI_EMPRESAIDF,'
      '  SAI.SAI_PROSER,'
      '  SAI.SAI_SERIAL,'
      '  SAI.SAI_CODHISTORICO,'
      '  SAI.NFI_IDFNOTA,'
      '  SAI.SAI_DATHORA,'
      '  SAI.SAI_PREBRU,'
      '  SAI.SAI_IPI,'
      '  SAI.SAI_MVA,'
      '  SAI.SAI_ICMSUB,'
      '  SAI.SAI_VALSUB'
      'FROM '
      '  SAIDA_ITEM SAI'
      'INNER JOIN'
      'ESTOQUE_PRODUTO ESP'
      'ON ESP.ESP_IDFCOD = SAI.SAI_IDFITEM'
      'WHERE SAI.SAI_IDFDOC = :SAD_IDFDOC'
      'ORDER BY SAI.SAI_SEQITEM;')
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 416
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    object ZQuerySaiProdutosSAI_IDFDOC: TIntegerField
      FieldName = 'SAI_IDFDOC'
      Required = True
    end
    object ZQuerySaiProdutosSAI_DESCRICAO: TStringField
      FieldName = 'SAI_DESCRICAO'
      Required = True
      Size = 40
    end
    object ZQuerySaiProdutosSAI_SEQITEM: TSmallintField
      FieldName = 'SAI_SEQITEM'
      Required = True
    end
    object ZQuerySaiProdutosSAI_IDFITEM: TIntegerField
      FieldName = 'SAI_IDFITEM'
      Required = True
    end
    object ZQuerySaiProdutosSAI_PRECOM: TFloatField
      FieldName = 'SAI_PRECOM'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZQuerySaiProdutosSAI_PRECUS: TFloatField
      FieldName = 'SAI_PRECUS'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZQuerySaiProdutosSAI_PRETAB: TFloatField
      FieldName = 'SAI_PRETAB'
      Required = True
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZQuerySaiProdutosSAI_PREVEN: TFloatField
      FieldName = 'SAI_PREVEN'
      Required = True
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZQuerySaiProdutosSAI_QUANTI: TFloatField
      FieldName = 'SAI_QUANTI'
      Required = True
    end
    object ZQuerySaiProdutosSAI_CANCEL: TStringField
      FieldName = 'SAI_CANCEL'
      Required = True
      Size = 1
    end
    object ZQuerySaiProdutosSAI_GARANTIA: TIntegerField
      FieldName = 'SAI_GARANTIA'
    end
    object ZQuerySaiProdutosSAI_EMPRESAIDF: TSmallintField
      FieldName = 'SAI_EMPRESAIDF'
    end
    object ZQuerySaiProdutosSAI_PROSER: TStringField
      FieldName = 'SAI_PROSER'
      Size = 1
    end
    object ZQuerySaiProdutosSAI_SERIAL: TStringField
      FieldName = 'SAI_SERIAL'
    end
    object ZQuerySaiProdutosSAI_CODHISTORICO: TStringField
      FieldName = 'SAI_CODHISTORICO'
      Size = 3
    end
    object ZQuerySaiProdutosNFI_IDFNOTA: TIntegerField
      FieldName = 'NFI_IDFNOTA'
    end
    object ZQuerySaiProdutosSAI_DATHORA: TDateTimeField
      FieldName = 'SAI_DATHORA'
    end
    object ZQuerySaiProdutosSAI_PREBRU: TFloatField
      FieldName = 'SAI_PREBRU'
    end
    object ZQuerySaiProdutosSAI_CODREF: TStringField
      FieldName = 'SAI_CODREF'
      Required = True
      Size = 13
    end
    object ZQuerySaiProdutosSAI_ICMS: TFloatField
      FieldName = 'SAI_ICMS'
    end
    object ZQuerySaiProdutosSAI_IPI: TFloatField
      FieldName = 'SAI_IPI'
    end
    object ZQuerySaiProdutosSAI_MVA: TFloatField
      FieldName = 'SAI_MVA'
    end
    object ZQuerySaiProdutosSAI_ICMSUB: TFloatField
      FieldName = 'SAI_ICMSUB'
    end
    object ZQuerySaiProdutosSAI_VALSUB: TFloatField
      FieldName = 'SAI_VALSUB'
    end
  end
  object ZNotasFiscais: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpNotasFiscais
    SQL.Strings = (
      'SELECT * FROM NOTAS_FISCAIS WHERE NFI_IDF = :NFI_ID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'NFI_ID'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 512
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NFI_ID'
        ParamType = ptUnknown
      end>
    object ZNotasFiscaisNFI_IDF: TIntegerField
      FieldName = 'NFI_IDF'
      Required = True
    end
    object ZNotasFiscaisNFI_CONDICOESPAGAMENTO: TStringField
      FieldName = 'NFI_CONDICOESPAGAMENTO'
      Size = 60
    end
    object ZNotasFiscaisNFI_EMISSAO: TDateTimeField
      FieldName = 'NFI_EMISSAO'
    end
    object ZNotasFiscaisNFI_DATAENTRADASAIDA: TDateField
      FieldName = 'NFI_DATAENTRADASAIDA'
    end
    object ZNotasFiscaisNFI_HORAENTRADASAIDA: TTimeField
      FieldName = 'NFI_HORAENTRADASAIDA'
    end
    object ZNotasFiscaisNFI_TIPONOTA: TStringField
      FieldName = 'NFI_TIPONOTA'
      Required = True
      Size = 1
    end
    object ZNotasFiscaisNFI_TIPOFRETE: TStringField
      FieldName = 'NFI_TIPOFRETE'
      Size = 1
    end
    object ZNotasFiscaisNFI_TOTBASEDECALCULO: TFloatField
      FieldName = 'NFI_TOTBASEDECALCULO'
    end
    object ZNotasFiscaisNFI_TOTICMS: TFloatField
      FieldName = 'NFI_TOTICMS'
    end
    object ZNotasFiscaisNFI_TOTBASEST: TFloatField
      FieldName = 'NFI_TOTBASEST'
    end
    object ZNotasFiscaisNFI_TOTICMSST: TFloatField
      FieldName = 'NFI_TOTICMSST'
    end
    object ZNotasFiscaisNFI_TOTVALOR_FRETE: TFloatField
      FieldName = 'NFI_TOTVALOR_FRETE'
    end
    object ZNotasFiscaisNFI_TOTVALOR_SEGURO: TFloatField
      FieldName = 'NFI_TOTVALOR_SEGURO'
    end
    object ZNotasFiscaisNFI_TOTOUTRASDESP: TFloatField
      FieldName = 'NFI_TOTOUTRASDESP'
    end
    object ZNotasFiscaisNFI_TOTVALORIPI: TFloatField
      FieldName = 'NFI_TOTVALORIPI'
    end
    object ZNotasFiscaisNFI_TOTISS: TFloatField
      FieldName = 'NFI_TOTISS'
    end
    object ZNotasFiscaisNFI_DADOSADICIONAIS: TMemoField
      FieldName = 'NFI_DADOSADICIONAIS'
      BlobType = ftMemo
    end
    object ZNotasFiscaisNFI_NUMERO: TIntegerField
      FieldName = 'NFI_NUMERO'
      Required = True
    end
    object ZNotasFiscaisNFI_ALIQUOTAISS: TFloatField
      FieldName = 'NFI_ALIQUOTAISS'
    end
    object ZNotasFiscaisNFI_SERIE: TStringField
      FieldName = 'NFI_SERIE'
      Size = 3
    end
    object ZNotasFiscaisNFI_FORMAPAG: TStringField
      FieldName = 'NFI_FORMAPAG'
      Size = 1
    end
    object ZNotasFiscaisNFI_CFOP: TStringField
      FieldName = 'NFI_CFOP'
      Size = 8
    end
  end
  object ZUpSaiProdutos: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM SAIDA_ITEM'
      'WHERE'
      '  SAIDA_ITEM.SAI_IDFDOC = :OLD_SAI_IDFDOC AND'
      '  SAIDA_ITEM.SAI_SEQITEM = :OLD_SAI_SEQITEM')
    InsertSQL.Strings = (
      'INSERT INTO SAIDA_ITEM'
      '  (SAI_IDFDOC, SAI_SEQITEM, SAI_IDFITEM, SAI_PRECOM, '
      'SAI_PRECUS, SAI_PRETAB, '
      '   SAI_PREVEN, SAI_QUANTI, SAI_CANCEL, SAI_ICMS, '
      'SAI_GARANTIA, SAI_EMPRESAIDF, '
      '   SAI_PROSER, SAI_SERIAL, SAI_CODHISTORICO, NFI_IDFNOTA, '
      'SAI_DATHORA, '
      '   SAI_PREBRU, SAI_IPI, SAI_MVA, SAI_ICMSUB, SAI_VALSUB)'
      'VALUES'
      '  (:SAI_IDFDOC, :SAI_SEQITEM, :SAI_IDFITEM, :SAI_PRECOM, '
      ':SAI_PRECUS, :SAI_PRETAB, '
      '   :SAI_PREVEN, :SAI_QUANTI, :SAI_CANCEL, :SAI_ICMS, '
      ':SAI_GARANTIA, :SAI_EMPRESAIDF, '
      '   :SAI_PROSER, :SAI_SERIAL, :SAI_CODHISTORICO, :NFI_IDFNOTA, '
      ':SAI_DATHORA, '
      '   :SAI_PREBRU, :SAI_IPI, :SAI_MVA, :SAI_ICMSUB, :SAI_VALSUB)')
    ModifySQL.Strings = (
      'UPDATE SAIDA_ITEM SET'
      '  SAI_IDFDOC = :SAI_IDFDOC,'
      '  SAI_SEQITEM = :SAI_SEQITEM,'
      '  SAI_IDFITEM = :SAI_IDFITEM,'
      '  SAI_PRECOM = :SAI_PRECOM,'
      '  SAI_PRECUS = :SAI_PRECUS,'
      '  SAI_PRETAB = :SAI_PRETAB,'
      '  SAI_PREVEN = :SAI_PREVEN,'
      '  SAI_QUANTI = :SAI_QUANTI,'
      '  SAI_CANCEL = :SAI_CANCEL,'
      '  SAI_ICMS = :SAI_ICMS,'
      '  SAI_GARANTIA = :SAI_GARANTIA,'
      '  SAI_EMPRESAIDF = :SAI_EMPRESAIDF,'
      '  SAI_PROSER = :SAI_PROSER,'
      '  SAI_SERIAL = :SAI_SERIAL,'
      '  SAI_CODHISTORICO = :SAI_CODHISTORICO,'
      '  NFI_IDFNOTA = :NFI_IDFNOTA,'
      '  SAI_DATHORA = :SAI_DATHORA,'
      '  SAI_PREBRU = :SAI_PREBRU,'
      '  SAI_IPI = :SAI_IPI,'
      '  SAI_MVA = :SAI_MVA,'
      '  SAI_ICMSUB = :SAI_ICMSUB,'
      '  SAI_VALSUB = :SAI_VALSUB'
      'WHERE'
      '  SAIDA_ITEM.SAI_IDFDOC = :OLD_SAI_IDFDOC AND'
      '  SAIDA_ITEM.SAI_SEQITEM = :OLD_SAI_SEQITEM')
    UseSequenceFieldForRefreshSQL = False
    Left = 488
    Top = 416
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAI_IDFDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_SEQITEM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_IDFITEM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PRECOM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PRECUS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PRETAB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PREVEN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_QUANTI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_CANCEL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_ICMS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_GARANTIA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_EMPRESAIDF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PROSER'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_SERIAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_CODHISTORICO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_IDFNOTA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_DATHORA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_PREBRU'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_IPI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_MVA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_ICMSUB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAI_VALSUB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_SAI_IDFDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_SAI_SEQITEM'
        ParamType = ptUnknown
      end>
  end
  object ZUpSaiServicos: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM SAIDA_SERVICO'
      'WHERE'
      '  SAIDA_SERVICO.SAD_IDFDOC = :OLD_SAD_IDFDOC AND'
      '  SAIDA_SERVICO.SAS_SEQITEM = :OLD_SAS_SEQITEM')
    InsertSQL.Strings = (
      'INSERT INTO SAIDA_SERVICO'
      
        '  (SAD_IDFDOC, SAS_SEQITEM, SAS_IDFSERVICO, SAS_PRETAB, SAS_PREV' +
        'EN, SAS_QUANTI, '
      
        '   SAS_CANCEL, SAS_ISS, SAS_GARANTIA, SAS_CODHISTORICO, SAS_IDFN' +
        'OTA, SAS_PREBRU, '
      '   SAS_DESCRICAO)'
      'VALUES'
      
        '  (:SAD_IDFDOC, :SAS_SEQITEM, :SAS_IDFSERVICO, :SAS_PRETAB, :SAS' +
        '_PREVEN, '
      
        '   :SAS_QUANTI, :SAS_CANCEL, :SAS_ISS, :SAS_GARANTIA, :SAS_CODHI' +
        'STORICO, '
      '   :SAS_IDFNOTA, :SAS_PREBRU, :SAS_DESCRICAO)')
    ModifySQL.Strings = (
      'UPDATE SAIDA_SERVICO SET'
      '  SAD_IDFDOC = :SAD_IDFDOC,'
      '  SAS_SEQITEM = :SAS_SEQITEM,'
      '  SAS_IDFSERVICO = :SAS_IDFSERVICO,'
      '  SAS_PRETAB = :SAS_PRETAB,'
      '  SAS_PREVEN = :SAS_PREVEN,'
      '  SAS_QUANTI = :SAS_QUANTI,'
      '  SAS_CANCEL = :SAS_CANCEL,'
      '  SAS_ISS = :SAS_ISS,'
      '  SAS_GARANTIA = :SAS_GARANTIA,'
      '  SAS_CODHISTORICO = :SAS_CODHISTORICO,'
      '  SAS_IDFNOTA = :SAS_IDFNOTA,'
      '  SAS_PREBRU = :SAS_PREBRU,'
      '  SAS_DESCRICAO = :SAS_DESCRICAO'
      'WHERE'
      '  SAIDA_SERVICO.SAD_IDFDOC = :OLD_SAD_IDFDOC AND'
      '  SAIDA_SERVICO.SAS_SEQITEM = :OLD_SAS_SEQITEM')
    UseSequenceFieldForRefreshSQL = False
    Left = 488
    Top = 464
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_SEQITEM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_IDFSERVICO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_PRETAB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_PREVEN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_QUANTI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_CANCEL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_ISS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_GARANTIA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_CODHISTORICO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_IDFNOTA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_PREBRU'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAS_DESCRICAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_SAD_IDFDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_SAS_SEQITEM'
        ParamType = ptUnknown
      end>
  end
  object ZQuerySaiServicos: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpSaiServicos
    SQL.Strings = (
      'SELECT '
      '  SAS.SAD_IDFDOC,'
      '  SER.SER_CODIGO SAS_SEVICOCOD,'
      '  SAS.SAS_SEQITEM,'
      '  SAS.SAS_IDFSERVICO,'
      '  SAS.SAS_PRETAB,'
      '  SAS.SAS_PREVEN,'
      '  SAS.SAS_QUANTI,'
      '  SAS.SAS_CANCEL,'
      '  SAS.SAS_ISS,'
      '  SAS.SAS_GARANTIA,'
      '  SAS.SAS_CODHISTORICO,'
      '  SAS.SAS_IDFNOTA,'
      '  SAS.SAS_PREBRU,'
      '  SAS.SAS_DESCRICAO'
      'FROM '
      '  SAIDA_SERVICO SAS'
      'INNER JOIN'
      'SERVICOS SER ON'
      'SER.SER_IDFSERVICO = SAS.SAS_IDFSERVICO'
      'WHERE SAD_IDFDOC = :SAD_IDFDOC')
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 464
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    object ZQuerySaiServicosSAD_IDFDOC: TIntegerField
      FieldName = 'SAD_IDFDOC'
      Required = True
    end
    object ZQuerySaiServicosSAS_SEQITEM: TSmallintField
      FieldName = 'SAS_SEQITEM'
      Required = True
    end
    object ZQuerySaiServicosSAS_IDFSERVICO: TIntegerField
      FieldName = 'SAS_IDFSERVICO'
      Required = True
    end
    object ZQuerySaiServicosSAS_PRETAB: TFloatField
      FieldName = 'SAS_PRETAB'
      Required = True
    end
    object ZQuerySaiServicosSAS_PREVEN: TFloatField
      FieldName = 'SAS_PREVEN'
      Required = True
    end
    object ZQuerySaiServicosSAS_QUANTI: TFloatField
      FieldName = 'SAS_QUANTI'
      Required = True
    end
    object ZQuerySaiServicosSAS_CANCEL: TStringField
      FieldName = 'SAS_CANCEL'
      Required = True
      Size = 1
    end
    object ZQuerySaiServicosSAS_ISS: TStringField
      FieldName = 'SAS_ISS'
      Size = 15
    end
    object ZQuerySaiServicosSAS_GARANTIA: TIntegerField
      FieldName = 'SAS_GARANTIA'
    end
    object ZQuerySaiServicosSAS_CODHISTORICO: TStringField
      FieldName = 'SAS_CODHISTORICO'
      Size = 3
    end
    object ZQuerySaiServicosSAS_IDFNOTA: TIntegerField
      FieldName = 'SAS_IDFNOTA'
    end
    object ZQuerySaiServicosSAS_PREBRU: TFloatField
      FieldName = 'SAS_PREBRU'
    end
    object ZQuerySaiServicosSAS_DESCRICAO: TMemoField
      FieldName = 'SAS_DESCRICAO'
      BlobType = ftMemo
    end
    object ZQuerySaiServicosSAS_SEVICOCOD: TStringField
      FieldName = 'SAS_SEVICOCOD'
      Required = True
      Size = 13
    end
  end
  object CDS_ENTRADA_DOCUMENTO: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'IDF'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ENTRADA_DOCUMENTO'
    Left = 80
    Top = 288
    object CDS_ENTRADA_DOCUMENTOEND_IDFDOCUMENTO: TIntegerField
      FieldName = 'END_IDFDOCUMENTO'
      Required = True
    end
    object CDS_ENTRADA_DOCUMENTOEND_DOCUMENTO: TStringField
      FieldName = 'END_DOCUMENTO'
      Required = True
      Size = 13
    end
    object CDS_ENTRADA_DOCUMENTOEND_DATAENTRADA: TDateField
      FieldName = 'END_DATAENTRADA'
      Required = True
      OnSetText = CDS_ENTRADA_DOCUMENTOEND_DATAENTRADASetText
    end
    object CDS_ENTRADA_DOCUMENTOEND_DATAEMISSAO: TDateField
      FieldName = 'END_DATAEMISSAO'
      Required = True
      OnSetText = CDS_ENTRADA_DOCUMENTOEND_DATAEMISSAOSetText
    end
    object CDS_ENTRADA_DOCUMENTOEND_EMPRESACODIGO: TSmallintField
      FieldName = 'END_EMPRESACODIGO'
      Required = True
    end
    object CDS_ENTRADA_DOCUMENTOEND_CFOPCODIGO: TStringField
      FieldName = 'END_CFOPCODIGO'
      Required = True
      Size = 8
    end
    object CDS_ENTRADA_DOCUMENTOEND_PEDIDO: TStringField
      FieldName = 'END_PEDIDO'
      Size = 13
    end
    object CDS_ENTRADA_DOCUMENTOEND_LANCAMENTO: TStringField
      FieldName = 'END_LANCAMENTO'
      Required = True
      Size = 1
    end
    object CDS_ENTRADA_DOCUMENTOEND_CANCELADO: TStringField
      FieldName = 'END_CANCELADO'
      Size = 1
    end
    object CDS_ENTRADA_DOCUMENTOEND_CTRLINC: TStringField
      FieldName = 'END_CTRLINC'
    end
    object CDS_ENTRADA_DOCUMENTOEND_PESSOAIDF: TIntegerField
      FieldName = 'END_PESSOAIDF'
      Required = True
    end
    object CDS_ENTRADA_DOCUMENTOEND_USUARIO: TStringField
      FieldName = 'END_USUARIO'
      Size = 3
    end
    object CDS_ENTRADA_DOCUMENTOEND_DATAREG: TDateTimeField
      FieldName = 'END_DATAREG'
    end
    object CDS_ENTRADA_DOCUMENTOEND_USUALTER: TStringField
      FieldName = 'END_USUALTER'
      Size = 3
    end
    object CDS_ENTRADA_DOCUMENTOEND_DATAALTER: TDateTimeField
      FieldName = 'END_DATAALTER'
    end
    object CDS_ENTRADA_DOCUMENTOEND_SAIDA_TRANSFERENCIA: TIntegerField
      FieldName = 'END_SAIDA_TRANSFERENCIA'
    end
    object CDS_ENTRADA_DOCUMENTOEND_NFE: TIntegerField
      FieldName = 'END_NFE'
    end
  end
  object CDS_ENTRADA_PRODUTO: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'IDFDOC'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ENTRADA_PRODUTO'
    Left = 80
    Top = 345
    object CDS_ENTRADA_PRODUTOENP_IDFDOCUMENTO: TIntegerField
      FieldName = 'ENP_IDFDOCUMENTO'
      Required = True
    end
    object CDS_ENTRADA_PRODUTOENP_SEQITEMDOCUM: TSmallintField
      FieldName = 'ENP_SEQITEMDOCUM'
      Required = True
    end
    object CDS_ENTRADA_PRODUTOENP_EMPRESACODIGO: TSmallintField
      FieldName = 'ENP_EMPRESACODIGO'
      Required = True
    end
    object CDS_ENTRADA_PRODUTOENP_IDFPRODUTO: TIntegerField
      FieldName = 'ENP_IDFPRODUTO'
      Required = True
    end
    object CDS_ENTRADA_PRODUTOENP_QUANTIDADE: TFloatField
      FieldName = 'ENP_QUANTIDADE'
      Required = True
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ENTRADA_PRODUTOENP_PRECOCOMPRA: TFloatField
      FieldName = 'ENP_PRECOCOMPRA'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ENTRADA_PRODUTOENP_PRECOCUSTO: TFloatField
      FieldName = 'ENP_PRECOCUSTO'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ENTRADA_PRODUTOENP_PRECOVENDA: TFloatField
      FieldName = 'ENP_PRECOVENDA'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ENTRADA_PRODUTOENP_PRECOATACADO: TFloatField
      FieldName = 'ENP_PRECOATACADO'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ENTRADA_PRODUTOENP_VALIDADE: TDateField
      FieldName = 'ENP_VALIDADE'
    end
    object CDS_ENTRADA_PRODUTOENP_LOTE: TIntegerField
      FieldName = 'ENP_LOTE'
    end
    object CDS_ENTRADA_PRODUTOENP_CANCELADO: TStringField
      FieldName = 'ENP_CANCELADO'
      Required = True
      Size = 1
    end
    object CDS_ENTRADA_PRODUTOENP_DATHORA: TDateTimeField
      FieldName = 'ENP_DATHORA'
    end
    object CDS_ENTRADA_PRODUTOENP_SITCOD: TStringField
      FieldName = 'ENP_SITCOD'
      Size = 2
    end
    object CDS_ENTRADA_PRODUTOENP_IPICOD: TStringField
      FieldName = 'ENP_IPICOD'
      Size = 2
    end
    object CDS_ENTRADA_PRODUTOENP_PISCOFINS: TStringField
      FieldName = 'ENP_PISCOFINS'
      Size = 1
    end
    object CDS_ENTRADA_PRODUTOENP_PROMOCAO: TStringField
      FieldName = 'ENP_PROMOCAO'
      Size = 1
    end
    object CDS_ENTRADA_PRODUTOENP_ATUALIZAPRECOS: TStringField
      FieldName = 'ENP_ATUALIZAPRECOS'
      Size = 1
    end
    object CDS_ENTRADA_PRODUTONFI_IDFNOTA: TIntegerField
      FieldName = 'NFI_IDFNOTA'
    end
    object CDS_ENTRADA_PRODUTOCODIGO: TStringField
      FieldName = 'CODIGO'
      Size = 13
    end
    object CDS_ENTRADA_PRODUTODESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
    object CDS_ENTRADA_PRODUTOCONTROLE: TStringField
      FieldName = 'CONTROLE'
      Size = 1
    end
    object CDS_ENTRADA_PRODUTOENP_PER_IPI: TFloatField
      FieldName = 'ENP_PER_IPI'
    end
    object CDS_ENTRADA_PRODUTOENP_PER_FRETE: TFloatField
      FieldName = 'ENP_PER_FRETE'
    end
    object CDS_ENTRADA_PRODUTOENP_PER_MARVAREJO: TFloatField
      FieldName = 'ENP_PER_MARVAREJO'
    end
    object CDS_ENTRADA_PRODUTOENP_PER_MARATACADO: TFloatField
      FieldName = 'ENP_PER_MARATACADO'
    end
    object CDS_ENTRADA_PRODUTOENP_PER_ICM: TFloatField
      FieldName = 'ENP_PER_ICM'
    end
  end
  object DSP_ENTRADA_DOCUMENTO: TDataSetProvider
    DataSet = ZEntrada_Documento
    Left = 240
    Top = 288
  end
  object DSP_ENTRADA_PRODUTO: TDataSetProvider
    DataSet = ZEntrada_Produtos
    Left = 240
    Top = 345
  end
  object CDS_ESTOQUE_SERIAL: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ESTOQUE_SERIAL'
    BeforeOpen = CDS_ESTOQUE_SERIALBeforeOpen
    Left = 80
    Top = 112
    object CDS_ESTOQUE_SERIALESS_IDFPRODUTO: TIntegerField
      FieldName = 'ESS_IDFPRODUTO'
      Required = True
    end
    object CDS_ESTOQUE_SERIALESS_IDFEMPRESA: TIntegerField
      FieldName = 'ESS_IDFEMPRESA'
      Required = True
    end
    object CDS_ESTOQUE_SERIALESS_SERIAL: TStringField
      FieldName = 'ESS_SERIAL'
      Required = True
    end
    object CDS_ESTOQUE_SERIALESS_LOCAL: TStringField
      FieldName = 'ESS_LOCAL'
      Size = 15
    end
    object CDS_ESTOQUE_SERIALESS_SALDO: TFloatField
      FieldName = 'ESS_SALDO'
      Required = True
    end
    object CDS_ESTOQUE_SERIALESS_DOCENT: TIntegerField
      FieldName = 'ESS_DOCENT'
    end
  end
  object DSP_ESTOQUE_SERIAL: TDataSetProvider
    DataSet = ZEstoque_Serial
    Left = 232
    Top = 120
  end
  object ZEstoque_Serial: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateESS
    SQL.Strings = (
      'select *  from ESTOQUE_SERIAL where ess_idfproduto=:idfcod;')
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 120
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
  end
  object ZUpdateESS: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ESTOQUE_SERIAL'
      'WHERE'
      'ESS_SERIAL = :OLD_ESS_SERIAL')
    InsertSQL.Strings = (
      'INSERT INTO ESTOQUE_SERIAL'
      '  (ESS_IDFPRODUTO, ESS_IDFEMPRESA, ESS_SERIAL, ESS_LOCAL, '
      'ESS_SALDO, ESS_DOCENT)'
      'VALUES'
      '  (:ESS_IDFPRODUTO, :ESS_IDFEMPRESA, :ESS_SERIAL, '
      ':ESS_LOCAL, :ESS_SALDO, '
      '   :ESS_DOCENT)')
    ModifySQL.Strings = (
      'UPDATE ESTOQUE_SERIAL SET'
      '  ESS_IDFPRODUTO = :ESS_IDFPRODUTO,'
      '  ESS_IDFEMPRESA = :ESS_IDFEMPRESA,'
      '  ESS_SERIAL = :ESS_SERIAL,'
      '  ESS_LOCAL = :ESS_LOCAL,'
      '  ESS_SALDO = :ESS_SALDO,'
      '  ESS_DOCENT = :ESS_DOCENT'
      'WHERE'
      'ESS_SERIAL = :OLD_ESS_SERIAL')
    UseSequenceFieldForRefreshSQL = False
    Left = 464
    Top = 120
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ESS_IDFPRODUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESS_IDFEMPRESA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESS_SERIAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESS_LOCAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESS_SALDO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESS_DOCENT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ESS_SERIAL'
        ParamType = ptUnknown
      end>
  end
  object ZEntrada_Serial: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateENS
    SQL.Strings = (
      'select *  from ENTRADA_SERIAL '
      'where '
      'ENS_IDFDOCUMENTO=:idf and '
      'ENS_IDFITEMDOCUM=:seq;')
    Params = <
      item
        DataType = ftUnknown
        Name = 'idf'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'seq'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 241
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'idf'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'seq'
        ParamType = ptUnknown
      end>
    object ZEntrada_SerialENS_IDFDOCUMENTO: TIntegerField
      FieldName = 'ENS_IDFDOCUMENTO'
      Required = True
    end
    object ZEntrada_SerialENS_IDFITEMDOCUM: TSmallintField
      FieldName = 'ENS_IDFITEMDOCUM'
      Required = True
    end
    object ZEntrada_SerialENS_SERIAL: TStringField
      FieldName = 'ENS_SERIAL'
      Required = True
    end
    object ZEntrada_SerialENS_QUANTIDADE: TFloatField
      FieldName = 'ENS_QUANTIDADE'
      Required = True
    end
    object ZEntrada_SerialENS_EMPRESACODIGO: TSmallintField
      FieldName = 'ENS_EMPRESACODIGO'
      Required = True
    end
    object ZEntrada_SerialENS_IDFPRODUTO: TIntegerField
      FieldName = 'ENS_IDFPRODUTO'
    end
    object ZEntrada_SerialENS_CANCELADO: TStringField
      FieldName = 'ENS_CANCELADO'
      Required = True
      Size = 1
    end
  end
  object ZUpdateENS: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ENTRADA_SERIAL'
      'WHERE'
      '  ENS_IDFDOCUMENTO = :OLD_ENS_IDFDOCUMENTO AND'
      '  ENS_SERIAL = :OLD_ENS_SERIAL')
    InsertSQL.Strings = (
      'INSERT INTO ENTRADA_SERIAL'
      
        '  (ENS_IDFDOCUMENTO, ENS_IDFITEMDOCUM, ENS_SERIAL, ENS_QUANTIDAD' +
        'E, ENS_EMPRESACODIGO, '
      '   ENS_IDFPRODUTO, ENS_CANCELADO)'
      'VALUES'
      
        '  (:ENS_IDFDOCUMENTO, :ENS_IDFITEMDOCUM, :ENS_SERIAL, :ENS_QUANT' +
        'IDADE, '
      '   :ENS_EMPRESACODIGO, :ENS_IDFPRODUTO, :ENS_CANCELADO)')
    ModifySQL.Strings = (
      'UPDATE ENTRADA_SERIAL SET'
      '  ENS_IDFDOCUMENTO = :ENS_IDFDOCUMENTO,'
      '  ENS_IDFITEMDOCUM = :ENS_IDFITEMDOCUM,'
      '  ENS_SERIAL = :ENS_SERIAL,'
      '  ENS_QUANTIDADE = :ENS_QUANTIDADE,'
      '  ENS_EMPRESACODIGO = :ENS_EMPRESACODIGO,'
      '  ENS_IDFPRODUTO = :ENS_IDFPRODUTO,'
      '  ENS_CANCELADO = :ENS_CANCELADO'
      'WHERE'
      ' ENS_IDFDOCUMENTO = :OLD_ENS_IDFDOCUMENTO AND'
      ' ENS_SERIAL = :OLD_ENS_SERIAL')
    UseSequenceFieldForRefreshSQL = False
    Left = 504
    Top = 241
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ENS_IDFDOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_IDFITEMDOCUM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_SERIAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_QUANTIDADE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_EMPRESACODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_IDFPRODUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ENS_CANCELADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ENS_IDFDOCUMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ENS_SERIAL'
        ParamType = ptUnknown
      end>
  end
  object CDS_ENTRADA_SERIAL: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'idf'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'seq'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ENTRADA_SERIAL'
    Left = 80
    Top = 233
    object CDS_ENTRADA_SERIALENS_IDFDOCUMENTO: TIntegerField
      FieldName = 'ENS_IDFDOCUMENTO'
      Required = True
    end
    object CDS_ENTRADA_SERIALENS_IDFITEMDOCUM: TSmallintField
      FieldName = 'ENS_IDFITEMDOCUM'
      Required = True
    end
    object CDS_ENTRADA_SERIALENS_SERIAL: TStringField
      FieldName = 'ENS_SERIAL'
      Required = True
    end
    object CDS_ENTRADA_SERIALENS_QUANTIDADE: TFloatField
      FieldName = 'ENS_QUANTIDADE'
      Required = True
    end
    object CDS_ENTRADA_SERIALENS_EMPRESACODIGO: TSmallintField
      FieldName = 'ENS_EMPRESACODIGO'
      Required = True
    end
    object CDS_ENTRADA_SERIALENS_IDFPRODUTO: TIntegerField
      FieldName = 'ENS_IDFPRODUTO'
    end
    object CDS_ENTRADA_SERIALENS_CANCELADO: TStringField
      FieldName = 'ENS_CANCELADO'
      Required = True
      Size = 1
    end
  end
  object DSP_ENTRADA_SERIAL: TDataSetProvider
    DataSet = ZEntrada_Serial
    Left = 240
    Top = 241
  end
  object CDS_ESTOQUE_PRODUTO: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ESTOQUE_PRODUTO'
    AfterClose = CDS_ESTOQUE_PRODUTOAfterClose
    AfterInsert = CDS_ESTOQUE_PRODUTOAfterInsert
    AfterCancel = CDS_ESTOQUE_PRODUTOAfterCancel
    AfterRefresh = CDS_ESTOQUE_PRODUTOAfterRefresh
    Left = 80
    Top = 64
    object CDS_ESTOQUE_PRODUTOESP_IDFCOD: TIntegerField
      FieldName = 'ESP_IDFCOD'
      Required = True
    end
    object CDS_ESTOQUE_PRODUTOESP_CODIGO: TStringField
      FieldName = 'ESP_CODIGO'
      Required = True
      Size = 13
    end
    object CDS_ESTOQUE_PRODUTOESP_DESCRI: TStringField
      FieldName = 'ESP_DESCRI'
      Required = True
      Size = 40
    end
    object CDS_ESTOQUE_PRODUTOESP_REFERE: TStringField
      FieldName = 'ESP_REFERE'
    end
    object CDS_ESTOQUE_PRODUTOESP_DATCAD: TDateField
      FieldName = 'ESP_DATCAD'
      Required = True
    end
    object CDS_ESTOQUE_PRODUTOESP_ATIVO: TStringField
      FieldName = 'ESP_ATIVO'
      Required = True
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_SECCOD: TStringField
      FieldName = 'ESP_SECCOD'
      Required = True
      Size = 3
    end
    object CDS_ESTOQUE_PRODUTOESP_SUBCOD: TStringField
      FieldName = 'ESP_SUBCOD'
      Required = True
      Size = 3
    end
    object CDS_ESTOQUE_PRODUTOESP_MARCOD: TStringField
      FieldName = 'ESP_MARCOD'
      Required = True
      Size = 15
    end
    object CDS_ESTOQUE_PRODUTOESP_CONTROLE: TStringField
      FieldName = 'ESP_CONTROLE'
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_COMPLE: TStringField
      FieldName = 'ESP_COMPLE'
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_TIPPRO: TStringField
      FieldName = 'ESP_TIPPRO'
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_COLCOD: TIntegerField
      FieldName = 'ESP_COLCOD'
    end
    object CDS_ESTOQUE_PRODUTOESP_TABTAMANHOS: TSmallintField
      FieldName = 'ESP_TABTAMANHOS'
    end
    object CDS_ESTOQUE_PRODUTOESP_VALIDADE: TStringField
      FieldName = 'ESP_VALIDADE'
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_LOTE: TStringField
      FieldName = 'ESP_LOTE'
      Size = 1
    end
    object CDS_ESTOQUE_PRODUTOESP_CODBAR: TStringField
      FieldName = 'ESP_CODBAR'
      Size = 15
    end
    object CDS_ESTOQUE_PRODUTOUNI_CODIGO: TStringField
      FieldName = 'UNI_CODIGO'
      Required = True
      Size = 3
    end
    object CDS_ESTOQUE_PRODUTOESP_PESOUNITARIO: TFloatField
      FieldName = 'ESP_PESOUNITARIO'
      DisplayFormat = '#####0.000'
      EditFormat = '0.000'
    end
    object CDS_ESTOQUE_PRODUTOESP_COMISSAO: TFloatField
      FieldName = 'ESP_COMISSAO'
      DisplayFormat = '#####0.00'
      EditFormat = '0.00'
    end
    object CDS_ESTOQUE_PRODUTOESP_UNIEMB: TStringField
      FieldName = 'ESP_UNIEMB'
      Size = 3
    end
    object CDS_ESTOQUE_PRODUTOESP_QTDEMB: TFloatField
      FieldName = 'ESP_QTDEMB'
    end
    object CDS_ESTOQUE_PRODUTOESP_NCM: TIntegerField
      FieldName = 'ESP_NCM'
    end
  end
  object ZEstoque_Produto: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateESP
    SQL.Strings = (
      'select * from ESTOQUE_PRODUTO where esp_idfcod=:idfcod;')
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 72
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    object ZEstoque_ProdutoESP_IDFCOD: TIntegerField
      FieldName = 'ESP_IDFCOD'
      Required = True
    end
    object ZEstoque_ProdutoESP_CODIGO: TStringField
      FieldName = 'ESP_CODIGO'
      Required = True
      Size = 13
    end
    object ZEstoque_ProdutoESP_DESCRI: TStringField
      FieldName = 'ESP_DESCRI'
      Required = True
      Size = 40
    end
    object ZEstoque_ProdutoESP_REFERE: TStringField
      FieldName = 'ESP_REFERE'
    end
    object ZEstoque_ProdutoESP_DATCAD: TDateField
      FieldName = 'ESP_DATCAD'
      Required = True
    end
    object ZEstoque_ProdutoESP_ATIVO: TStringField
      FieldName = 'ESP_ATIVO'
      Required = True
      Size = 1
    end
    object ZEstoque_ProdutoESP_SECCOD: TStringField
      FieldName = 'ESP_SECCOD'
      Required = True
      Size = 3
    end
    object ZEstoque_ProdutoESP_SUBCOD: TStringField
      FieldName = 'ESP_SUBCOD'
      Required = True
      Size = 3
    end
    object ZEstoque_ProdutoESP_MARCOD: TStringField
      FieldName = 'ESP_MARCOD'
      Required = True
      Size = 15
    end
    object ZEstoque_ProdutoESP_CONTROLE: TStringField
      FieldName = 'ESP_CONTROLE'
      Size = 1
    end
    object ZEstoque_ProdutoESP_COMPLE: TStringField
      FieldName = 'ESP_COMPLE'
      Size = 1
    end
    object ZEstoque_ProdutoESP_TIPPRO: TStringField
      FieldName = 'ESP_TIPPRO'
      Size = 1
    end
    object ZEstoque_ProdutoESP_COLCOD: TIntegerField
      FieldName = 'ESP_COLCOD'
    end
    object ZEstoque_ProdutoESP_TABTAMANHOS: TSmallintField
      FieldName = 'ESP_TABTAMANHOS'
    end
    object ZEstoque_ProdutoESP_VALIDADE: TStringField
      FieldName = 'ESP_VALIDADE'
      Size = 1
    end
    object ZEstoque_ProdutoESP_LOTE: TStringField
      FieldName = 'ESP_LOTE'
      Size = 1
    end
    object ZEstoque_ProdutoESP_CODBAR: TStringField
      FieldName = 'ESP_CODBAR'
      Size = 15
    end
    object ZEstoque_ProdutoUNI_CODIGO: TStringField
      FieldName = 'UNI_CODIGO'
      Size = 3
    end
    object ZEstoque_ProdutoESP_PESOUNITARIO: TFloatField
      FieldName = 'ESP_PESOUNITARIO'
    end
    object ZEstoque_ProdutoESP_COMISSAO: TFloatField
      FieldName = 'ESP_COMISSAO'
    end
    object ZEstoque_ProdutoESP_UNIEMB: TStringField
      FieldName = 'ESP_UNIEMB'
      Size = 3
    end
    object ZEstoque_ProdutoESP_QTDEMB: TFloatField
      FieldName = 'ESP_QTDEMB'
    end
    object ZEstoque_ProdutoESP_NCM: TIntegerField
      FieldName = 'ESP_NCM'
    end
  end
  object ZUpdateESP: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ESTOQUE_PRODUTO'
      'WHERE'
      '  ESTOQUE_PRODUTO.ESP_IDFCOD = :OLD_ESP_IDFCOD')
    InsertSQL.Strings = (
      'INSERT INTO ESTOQUE_PRODUTO'
      '  (ESP_IDFCOD, ESP_CODIGO, ESP_DESCRI, ESP_REFERE, '
      'ESP_DATCAD, ESP_ATIVO, '
      '   ESP_SECCOD, ESP_SUBCOD, ESP_MARCOD, ESP_CONTROLE, '
      'ESP_COMPLE, ESP_TIPPRO, '
      '   ESP_COLCOD, ESP_TABTAMANHOS, ESP_VALIDADE, ESP_LOTE, '
      'ESP_CODBAR, UNI_CODIGO, '
      '   ESP_PESOUNITARIO, ESP_COMISSAO, ESP_UNIEMB, '
      'ESP_QTDEMB, ESP_NCM)'
      'VALUES'
      '  (:ESP_IDFCOD, :ESP_CODIGO, :ESP_DESCRI, :ESP_REFERE, '
      ':ESP_DATCAD, :ESP_ATIVO, '
      '   :ESP_SECCOD, :ESP_SUBCOD, :ESP_MARCOD, :ESP_CONTROLE, '
      ':ESP_COMPLE, :ESP_TIPPRO, '
      '   :ESP_COLCOD, :ESP_TABTAMANHOS, :ESP_VALIDADE, '
      ':ESP_LOTE, :ESP_CODBAR, '
      '   :UNI_CODIGO, :ESP_PESOUNITARIO, :ESP_COMISSAO, '
      ':ESP_UNIEMB, :ESP_QTDEMB, :ESP_NCM)')
    ModifySQL.Strings = (
      'UPDATE ESTOQUE_PRODUTO SET'
      '  ESP_IDFCOD = :ESP_IDFCOD,'
      '  ESP_CODIGO = :ESP_CODIGO,'
      '  ESP_DESCRI = :ESP_DESCRI,'
      '  ESP_REFERE = :ESP_REFERE,'
      '  ESP_DATCAD = :ESP_DATCAD,'
      '  ESP_ATIVO = :ESP_ATIVO,'
      '  ESP_SECCOD = :ESP_SECCOD,'
      '  ESP_SUBCOD = :ESP_SUBCOD,'
      '  ESP_MARCOD = :ESP_MARCOD,'
      '  ESP_CONTROLE = :ESP_CONTROLE,'
      '  ESP_COMPLE = :ESP_COMPLE,'
      '  ESP_TIPPRO = :ESP_TIPPRO,'
      '  ESP_COLCOD = :ESP_COLCOD,'
      '  ESP_TABTAMANHOS = :ESP_TABTAMANHOS,'
      '  ESP_VALIDADE = :ESP_VALIDADE,'
      '  ESP_LOTE = :ESP_LOTE,'
      '  ESP_CODBAR = :ESP_CODBAR,'
      '  UNI_CODIGO = :UNI_CODIGO,'
      '  ESP_PESOUNITARIO = :ESP_PESOUNITARIO,'
      '  ESP_COMISSAO = :ESP_COMISSAO,'
      '  ESP_UNIEMB = :ESP_UNIEMB,'
      '  ESP_QTDEMB = :ESP_QTDEMB,'
      '  ESP_NCM = :ESP_NCM'
      'WHERE'
      '  ESTOQUE_PRODUTO.ESP_IDFCOD = :OLD_ESP_IDFCOD')
    UseSequenceFieldForRefreshSQL = False
    Left = 464
    Top = 64
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ESP_IDFCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_CODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_DESCRI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_REFERE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_DATCAD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_ATIVO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_SECCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_SUBCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_MARCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_CONTROLE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_COMPLE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_TIPPRO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_COLCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_TABTAMANHOS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_VALIDADE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_LOTE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_CODBAR'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'UNI_CODIGO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_PESOUNITARIO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_COMISSAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_UNIEMB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_QTDEMB'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESP_NCM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ESP_IDFCOD'
        ParamType = ptUnknown
      end>
  end
  object DSP_ESTOQUE_PRODUTO: TDataSetProvider
    DataSet = ZEstoque_Produto
    Left = 232
    Top = 64
  end
  object CDS_ESTOQUE_EMPRESA: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_ESTOQUE_EMPRESA'
    AfterInsert = CDS_ESTOQUE_EMPRESAAfterInsert
    Left = 80
    Top = 16
    object CDS_ESTOQUE_EMPRESAESE_IDFCOD: TIntegerField
      FieldName = 'ESE_IDFCOD'
      Required = True
    end
    object CDS_ESTOQUE_EMPRESAESE_EMPCOD: TSmallintField
      FieldName = 'ESE_EMPCOD'
      Required = True
    end
    object CDS_ESTOQUE_EMPRESAESE_PRECOM: TFloatField
      FieldName = 'ESE_PRECOM'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ESTOQUE_EMPRESAESE_PRECUS: TFloatField
      FieldName = 'ESE_PRECUS'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ESTOQUE_EMPRESAESE_PREVEN: TFloatField
      FieldName = 'ESE_PREVEN'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ESTOQUE_EMPRESAESE_PREATA: TFloatField
      FieldName = 'ESE_PREATA'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_ESTOQUE_EMPRESAESE_LOCAL: TStringField
      FieldName = 'ESE_LOCAL'
      Size = 10
    end
    object CDS_ESTOQUE_EMPRESAESE_SITCOD: TStringField
      FieldName = 'ESE_SITCOD'
      Required = True
      Size = 2
    end
    object CDS_ESTOQUE_EMPRESAESE_IPICOD: TStringField
      FieldName = 'ESE_IPICOD'
      Required = True
      Size = 2
    end
    object CDS_ESTOQUE_EMPRESAESE_PISCOFINS: TStringField
      FieldName = 'ESE_PISCOFINS'
      Size = 1
    end
    object CDS_ESTOQUE_EMPRESAESE_PROMOCAO: TStringField
      FieldName = 'ESE_PROMOCAO'
      Size = 1
    end
    object CDS_ESTOQUE_EMPRESAESE_SALDO: TFloatField
      FieldName = 'ESE_SALDO'
    end
    object CDS_ESTOQUE_EMPRESAESE_QTDATACADO: TFloatField
      FieldName = 'ESE_QTDATACADO'
    end
    object CDS_ESTOQUE_EMPRESAESE_RESERVADO: TFloatField
      FieldName = 'ESE_RESERVADO'
    end
    object CDS_ESTOQUE_EMPRESAESE_DESCONTOMAX: TFloatField
      FieldName = 'ESE_DESCONTOMAX'
      DisplayFormat = '##0.00'
    end
  end
  object ZEstoque_Empresa: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateESE
    SQL.Strings = (
      'select *  from ESTOQUE_EMPRESA where ese_idfcod=:idfcod;')
    Params = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    Left = 384
    Top = 16
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'idfcod'
        ParamType = ptUnknown
      end>
    object ZEstoque_EmpresaESE_IDFCOD: TIntegerField
      FieldName = 'ESE_IDFCOD'
      Required = True
    end
    object ZEstoque_EmpresaESE_EMPCOD: TSmallintField
      FieldName = 'ESE_EMPCOD'
      Required = True
    end
    object ZEstoque_EmpresaESE_PRECOM: TFloatField
      FieldName = 'ESE_PRECOM'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEstoque_EmpresaESE_PRECUS: TFloatField
      FieldName = 'ESE_PRECUS'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEstoque_EmpresaESE_PREVEN: TFloatField
      FieldName = 'ESE_PREVEN'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEstoque_EmpresaESE_PREATA: TFloatField
      FieldName = 'ESE_PREATA'
      DisplayFormat = '########0.00###'
      EditFormat = '########0.00###'
    end
    object ZEstoque_EmpresaESE_LOCAL: TStringField
      FieldName = 'ESE_LOCAL'
      Size = 10
    end
    object ZEstoque_EmpresaESE_SITCOD: TStringField
      FieldName = 'ESE_SITCOD'
      Required = True
      Size = 2
    end
    object ZEstoque_EmpresaESE_IPICOD: TStringField
      FieldName = 'ESE_IPICOD'
      Required = True
      Size = 2
    end
    object ZEstoque_EmpresaESE_PISCOFINS: TStringField
      FieldName = 'ESE_PISCOFINS'
      Size = 1
    end
    object ZEstoque_EmpresaESE_PROMOCAO: TStringField
      FieldName = 'ESE_PROMOCAO'
      Size = 1
    end
    object ZEstoque_EmpresaESE_SALDO: TFloatField
      FieldName = 'ESE_SALDO'
    end
    object ZEstoque_EmpresaESE_QTDATACADO: TFloatField
      FieldName = 'ESE_QTDATACADO'
    end
    object ZEstoque_EmpresaESE_RESERVADO: TFloatField
      FieldName = 'ESE_RESERVADO'
    end
    object ZEstoque_EmpresaESE_DESCONTOMAX: TFloatField
      FieldName = 'ESE_DESCONTOMAX'
    end
  end
  object ZUpdateESE: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM ESTOQUE_EMPRESA'
      'WHERE'
      '  ESTOQUE_EMPRESA.ESE_IDFCOD = :OLD_ESE_IDFCOD AND'
      '  ESTOQUE_EMPRESA.ESE_EMPCOD = :OLD_ESE_EMPCOD')
    InsertSQL.Strings = (
      'INSERT INTO ESTOQUE_EMPRESA'
      '  (ESE_IDFCOD, ESE_EMPCOD, ESE_PRECOM, ESE_PRECUS, '
      'ESE_PREVEN, ESE_PREATA, '
      '   ESE_LOCAL, ESE_SITCOD, ESE_IPICOD, ESE_PISCOFINS, '
      'ESE_PROMOCAO, ESE_SALDO, '
      '   ESE_QTDATACADO, ESE_RESERVADO,ESE_DESCONTOMAX)'
      'VALUES'
      '  (:ESE_IDFCOD, :ESE_EMPCOD, :ESE_PRECOM, :ESE_PRECUS, '
      ':ESE_PREVEN, :ESE_PREATA, '
      '   :ESE_LOCAL, :ESE_SITCOD, :ESE_IPICOD, :ESE_PISCOFINS, '
      ':ESE_PROMOCAO, '
      '   :ESE_SALDO, :ESE_QTDATACADO, :ESE_RESERVADO, '
      ':ESE_DESCONTOMAX)')
    ModifySQL.Strings = (
      'UPDATE ESTOQUE_EMPRESA SET'
      '  ESE_IDFCOD = :ESE_IDFCOD,'
      '  ESE_EMPCOD = :ESE_EMPCOD,'
      '  ESE_PRECOM = :ESE_PRECOM,'
      '  ESE_PRECUS = :ESE_PRECUS,'
      '  ESE_PREVEN = :ESE_PREVEN,'
      '  ESE_PREATA = :ESE_PREATA,'
      '  ESE_LOCAL = :ESE_LOCAL,'
      '  ESE_SITCOD = :ESE_SITCOD,'
      '  ESE_IPICOD = :ESE_IPICOD,'
      '  ESE_PISCOFINS = :ESE_PISCOFINS,'
      '  ESE_PROMOCAO = :ESE_PROMOCAO,'
      '  ESE_SALDO = :ESE_SALDO,'
      '  ESE_QTDATACADO = :ESE_QTDATACADO,'
      '  ESE_RESERVADO = :ESE_RESERVADO,'
      '  ESE_DESCONTOMAX = :ESE_DESCONTOMAX'
      'WHERE'
      '  ESTOQUE_EMPRESA.ESE_IDFCOD = :OLD_ESE_IDFCOD AND'
      '  ESTOQUE_EMPRESA.ESE_EMPCOD = :OLD_ESE_EMPCOD')
    UseSequenceFieldForRefreshSQL = False
    Left = 464
    Top = 16
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'ESE_IDFCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_EMPCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PRECOM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PRECUS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PREVEN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PREATA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_LOCAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_SITCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_IPICOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PISCOFINS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_PROMOCAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_SALDO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_QTDATACADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_RESERVADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ESE_DESCONTOMAX'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ESE_IDFCOD'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_ESE_EMPCOD'
        ParamType = ptUnknown
      end>
  end
  object DSP_ESTOQUE_EMPRESA: TDataSetProvider
    DataSet = ZEstoque_Empresa
    Left = 232
    Top = 16
  end
  object CDS_SAIDA_PRODUTOS: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_SAIDA_PRODUTOS'
    OnCalcFields = CDS_SAIDA_PRODUTOSCalcFields
    Left = 80
    Top = 416
    object CDS_SAIDA_PRODUTOSSAI_IDFDOC: TIntegerField
      FieldName = 'SAI_IDFDOC'
      Required = True
    end
    object CDS_SAIDA_PRODUTOSSAI_SEQITEM: TSmallintField
      FieldName = 'SAI_SEQITEM'
      Required = True
    end
    object CDS_SAIDA_PRODUTOSSAI_IDFITEM: TIntegerField
      FieldName = 'SAI_IDFITEM'
      Required = True
    end
    object CDS_SAIDA_PRODUTOSSAI_PRECOM: TFloatField
      FieldName = 'SAI_PRECOM'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_PRECUS: TFloatField
      FieldName = 'SAI_PRECUS'
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_PRETAB: TFloatField
      FieldName = 'SAI_PRETAB'
      Required = True
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_PREVEN: TFloatField
      FieldName = 'SAI_PREVEN'
      Required = True
      DisplayFormat = '########0.00'
      EditFormat = '########0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_QUANTI: TFloatField
      FieldName = 'SAI_QUANTI'
      Required = True
    end
    object CDS_SAIDA_PRODUTOSSAI_CANCEL: TStringField
      FieldName = 'SAI_CANCEL'
      Required = True
      Size = 1
    end
    object CDS_SAIDA_PRODUTOSSAI_GARANTIA: TIntegerField
      FieldName = 'SAI_GARANTIA'
    end
    object CDS_SAIDA_PRODUTOSSAI_EMPRESAIDF: TSmallintField
      FieldName = 'SAI_EMPRESAIDF'
    end
    object CDS_SAIDA_PRODUTOSSAI_PROSER: TStringField
      FieldName = 'SAI_PROSER'
      Size = 1
    end
    object CDS_SAIDA_PRODUTOSSAI_SERIAL: TStringField
      FieldName = 'SAI_SERIAL'
    end
    object CDS_SAIDA_PRODUTOSSAI_CODHISTORICO: TStringField
      FieldName = 'SAI_CODHISTORICO'
      Size = 3
    end
    object CDS_SAIDA_PRODUTOSNFI_IDFNOTA: TIntegerField
      FieldName = 'NFI_IDFNOTA'
    end
    object CDS_SAIDA_PRODUTOSSAI_DATHORA: TDateTimeField
      FieldName = 'SAI_DATHORA'
    end
    object CDS_SAIDA_PRODUTOSSAI_PREBRU: TFloatField
      FieldName = 'SAI_PREBRU'
      DisplayFormat = ',0.00'
      EditFormat = '0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_DESCRICAO: TStringField
      FieldName = 'SAI_DESCRICAO'
      Required = True
      Size = 40
    end
    object CDS_SAIDA_PRODUTOSSAI_CODREF: TStringField
      FieldName = 'SAI_CODREF'
      Required = True
      Size = 13
    end
    object CDS_SAIDA_PRODUTOSSAI_ICMS: TFloatField
      FieldName = 'SAI_ICMS'
    end
    object CDS_SAIDA_PRODUTOSSAI_IPI: TFloatField
      FieldName = 'SAI_IPI'
    end
    object CDS_SAIDA_PRODUTOSSAI_TOTAL: TFloatField
      FieldKind = fkCalculated
      FieldName = 'SAI_TOTAL'
      DisplayFormat = ',0.00'
      EditFormat = '0.00'
      Calculated = True
    end
    object CDS_SAIDA_PRODUTOSSAI_VICMS: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'SAI_VICMS'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object CDS_SAIDA_PRODUTOSSAI_VIPI: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'SAI_VIPI'
      DisplayFormat = ',0.00'
      Calculated = True
    end
    object CDS_SAIDA_PRODUTOSSAI_MVA: TFloatField
      FieldName = 'SAI_MVA'
    end
    object CDS_SAIDA_PRODUTOSSAI_ICMSUB: TFloatField
      FieldName = 'SAI_ICMSUB'
    end
    object CDS_SAIDA_PRODUTOSSAI_VALSUB: TFloatField
      FieldName = 'SAI_VALSUB'
    end
    object CDS_SAIDA_PRODUTOSSAI_BASEICMSST: TCurrencyField
      FieldKind = fkInternalCalc
      FieldName = 'SAI_BASEICMSST'
      DisplayFormat = ',0.00'
    end
    object CDS_SAIDA_PRODUTOSSAI_TOTALITEM: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'SAI_TOTALITEM'
      Calculated = True
    end
  end
  object CDS_SAIDA_SERVICOS: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_SAIDA_SERVICOS'
    AfterOpen = CDS_SAIDA_SERVICOSAfterOpen
    AfterInsert = CDS_SAIDA_SERVICOSAfterInsert
    Left = 80
    Top = 464
    object CDS_SAIDA_SERVICOSSAD_IDFDOC: TIntegerField
      FieldName = 'SAD_IDFDOC'
      Required = True
    end
    object CDS_SAIDA_SERVICOSSAS_SEQITEM: TSmallintField
      FieldName = 'SAS_SEQITEM'
      Required = True
    end
    object CDS_SAIDA_SERVICOSSAS_IDFSERVICO: TIntegerField
      FieldName = 'SAS_IDFSERVICO'
      Required = True
    end
    object CDS_SAIDA_SERVICOSSAS_PRETAB: TFloatField
      FieldName = 'SAS_PRETAB'
      Required = True
      DisplayFormat = ',0.00'
      EditFormat = '0.00'
    end
    object CDS_SAIDA_SERVICOSSAS_PREVEN: TFloatField
      FieldName = 'SAS_PREVEN'
      Required = True
      DisplayFormat = ',0.00'
      EditFormat = '0.00'
    end
    object CDS_SAIDA_SERVICOSSAS_QUANTI: TFloatField
      FieldName = 'SAS_QUANTI'
      Required = True
    end
    object CDS_SAIDA_SERVICOSSAS_CANCEL: TStringField
      FieldName = 'SAS_CANCEL'
      Required = True
      Size = 1
    end
    object CDS_SAIDA_SERVICOSSAS_ISS: TStringField
      FieldName = 'SAS_ISS'
      Size = 15
    end
    object CDS_SAIDA_SERVICOSSAS_GARANTIA: TIntegerField
      FieldName = 'SAS_GARANTIA'
    end
    object CDS_SAIDA_SERVICOSSAS_CODHISTORICO: TStringField
      FieldName = 'SAS_CODHISTORICO'
      Size = 3
    end
    object CDS_SAIDA_SERVICOSSAS_IDFNOTA: TIntegerField
      FieldName = 'SAS_IDFNOTA'
    end
    object CDS_SAIDA_SERVICOSSAS_PREBRU: TFloatField
      FieldName = 'SAS_PREBRU'
      DisplayFormat = ',0.00'
      EditFormat = '0.00'
    end
    object CDS_SAIDA_SERVICOSSAS_DESCRICAO: TMemoField
      FieldName = 'SAS_DESCRICAO'
      BlobType = ftMemo
    end
    object CDS_SAIDA_SERVICOSSAS_SEVICOCOD: TStringField
      FieldName = 'SAS_SEVICOCOD'
      Required = True
      Size = 13
    end
  end
  object CDS_NOTAS_FISCAIS: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'NFI_ID'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_NOTAS_FISCAIS'
    AfterOpen = CDS_NOTAS_FISCAISAfterOpen
    BeforeClose = CDS_NOTAS_FISCAISBeforeClose
    Left = 80
    Top = 520
    object CDS_NOTAS_FISCAISNFI_IDF: TIntegerField
      FieldName = 'NFI_IDF'
      Required = True
    end
    object CDS_NOTAS_FISCAISNFI_CONDICOESPAGAMENTO: TStringField
      FieldName = 'NFI_CONDICOESPAGAMENTO'
      Size = 60
    end
    object CDS_NOTAS_FISCAISNFI_EMISSAO: TDateTimeField
      FieldName = 'NFI_EMISSAO'
    end
    object CDS_NOTAS_FISCAISNFI_DATAENTRADASAIDA: TDateField
      FieldName = 'NFI_DATAENTRADASAIDA'
    end
    object CDS_NOTAS_FISCAISNFI_HORAENTRADASAIDA: TTimeField
      FieldName = 'NFI_HORAENTRADASAIDA'
    end
    object CDS_NOTAS_FISCAISNFI_TIPONOTA: TStringField
      FieldName = 'NFI_TIPONOTA'
      Required = True
      Size = 1
    end
    object CDS_NOTAS_FISCAISNFI_TIPOFRETE: TStringField
      FieldName = 'NFI_TIPOFRETE'
      Size = 1
    end
    object CDS_NOTAS_FISCAISNFI_TOTBASEDECALCULO: TFloatField
      FieldName = 'NFI_TOTBASEDECALCULO'
    end
    object CDS_NOTAS_FISCAISNFI_TOTICMS: TFloatField
      FieldName = 'NFI_TOTICMS'
    end
    object CDS_NOTAS_FISCAISNFI_TOTBASEST: TFloatField
      FieldName = 'NFI_TOTBASEST'
    end
    object CDS_NOTAS_FISCAISNFI_TOTICMSST: TFloatField
      FieldName = 'NFI_TOTICMSST'
    end
    object CDS_NOTAS_FISCAISNFI_TOTVALOR_FRETE: TFloatField
      FieldName = 'NFI_TOTVALOR_FRETE'
    end
    object CDS_NOTAS_FISCAISNFI_TOTVALOR_SEGURO: TFloatField
      FieldName = 'NFI_TOTVALOR_SEGURO'
    end
    object CDS_NOTAS_FISCAISNFI_TOTOUTRASDESP: TFloatField
      FieldName = 'NFI_TOTOUTRASDESP'
    end
    object CDS_NOTAS_FISCAISNFI_TOTVALORIPI: TFloatField
      FieldName = 'NFI_TOTVALORIPI'
    end
    object CDS_NOTAS_FISCAISNFI_TOTISS: TFloatField
      FieldName = 'NFI_TOTISS'
    end
    object CDS_NOTAS_FISCAISNFI_DADOSADICIONAIS: TMemoField
      FieldName = 'NFI_DADOSADICIONAIS'
      BlobType = ftMemo
    end
    object CDS_NOTAS_FISCAISNFI_NUMERO: TIntegerField
      FieldName = 'NFI_NUMERO'
      Required = True
    end
    object CDS_NOTAS_FISCAISNFI_ALIQUOTAISS: TFloatField
      FieldName = 'NFI_ALIQUOTAISS'
    end
    object CDS_NOTAS_FISCAISNFI_SERIE: TStringField
      FieldName = 'NFI_SERIE'
      Size = 3
    end
    object CDS_NOTAS_FISCAISNFI_FORMAPAG: TStringField
      FieldName = 'NFI_FORMAPAG'
      Size = 1
    end
    object CDS_NOTAS_FISCAISNFI_CFOP: TStringField
      FieldName = 'NFI_CFOP'
      Size = 8
    end
  end
  object DSP_SAIDA_PRODUTOS: TDataSetProvider
    DataSet = ZQuerySaiProdutos
    Options = [poPropogateChanges]
    Left = 224
    Top = 416
  end
  object DSP_SAIDA_SERVICOS: TDataSetProvider
    DataSet = ZQuerySaiServicos
    Left = 224
    Top = 464
  end
  object DSP_NOTAS_FISCAIS: TDataSetProvider
    DataSet = ZNotasFiscais
    Left = 224
    Top = 512
  end
  object ZUpNotasFiscais: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM NOTAS_FISCAIS'
      'WHERE'
      '  NOTAS_FISCAIS.NFI_IDF = :OLD_NFI_IDF')
    InsertSQL.Strings = (
      'INSERT INTO NOTAS_FISCAIS'
      '  (NFI_IDF, NFI_CONDICOESPAGAMENTO, NFI_EMISSAO, '
      'NFI_DATAENTRADASAIDA, NFI_HORAENTRADASAIDA, '
      '   NFI_TIPONOTA, NFI_TIPOFRETE, NFI_TOTBASEDECALCULO, '
      'NFI_TOTICMS, NFI_TOTBASEST, '
      '   NFI_TOTICMSST, NFI_TOTVALOR_FRETE, '
      'NFI_TOTVALOR_SEGURO, NFI_TOTOUTRASDESP, '
      '   NFI_TOTVALORIPI, NFI_TOTISS, NFI_DADOSADICIONAIS, '
      'NFI_NUMERO, NFI_ALIQUOTAISS, '
      '   NFI_SERIE, NFI_FORMAPAG,NFI_CFOP)'
      'VALUES'
      '  (:NFI_IDF,:NFI_CONDICOESPAGAMENTO, :NFI_EMISSAO, '
      ':NFI_DATAENTRADASAIDA, :NFI_HORAENTRADASAIDA, '
      '   :NFI_TIPONOTA, :NFI_TIPOFRETE, :NFI_TOTBASEDECALCULO, '
      ':NFI_TOTICMS, '
      '   :NFI_TOTBASEST, :NFI_TOTICMSST, :NFI_TOTVALOR_FRETE, '
      ':NFI_TOTVALOR_SEGURO, '
      '   :NFI_TOTOUTRASDESP, :NFI_TOTVALORIPI, :NFI_TOTISS, '
      ':NFI_DADOSADICIONAIS, '
      '   :NFI_NUMERO, :NFI_ALIQUOTAISS, :NFI_SERIE, :NFI_FORMAPAG, '
      ':NFI_CFOP)')
    ModifySQL.Strings = (
      'UPDATE NOTAS_FISCAIS SET'
      '  NFI_CONDICOESPAGAMENTO = :NFI_CONDICOESPAGAMENTO,'
      '  NFI_EMISSAO = :NFI_EMISSAO,'
      '  NFI_DATAENTRADASAIDA = :NFI_DATAENTRADASAIDA,'
      '  NFI_HORAENTRADASAIDA = :NFI_HORAENTRADASAIDA,'
      '  NFI_TIPONOTA = :NFI_TIPONOTA,'
      '  NFI_TIPOFRETE = :NFI_TIPOFRETE,'
      '  NFI_TOTBASEDECALCULO = :NFI_TOTBASEDECALCULO,'
      '  NFI_TOTICMS = :NFI_TOTICMS,'
      '  NFI_TOTBASEST = :NFI_TOTBASEST,'
      '  NFI_TOTICMSST = :NFI_TOTICMSST,'
      '  NFI_TOTVALOR_FRETE = :NFI_TOTVALOR_FRETE,'
      '  NFI_TOTVALOR_SEGURO = :NFI_TOTVALOR_SEGURO,'
      '  NFI_TOTOUTRASDESP = :NFI_TOTOUTRASDESP,'
      '  NFI_TOTVALORIPI = :NFI_TOTVALORIPI,'
      '  NFI_TOTISS = :NFI_TOTISS,'
      '  NFI_DADOSADICIONAIS = :NFI_DADOSADICIONAIS,'
      '  NFI_NUMERO = :NFI_NUMERO,'
      '  NFI_ALIQUOTAISS = :NFI_ALIQUOTAISS,'
      '  NFI_SERIE = :NFI_SERIE,'
      '  NFI_FORMAPAG = :NFI_FORMAPAG,'
      '  NFI_CFOP = :NFI_CFOP'
      'WHERE'
      '  NOTAS_FISCAIS.NFI_IDF = :OLD_NFI_IDF')
    UseSequenceFieldForRefreshSQL = False
    Left = 488
    Top = 512
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NFI_CONDICOESPAGAMENTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_EMISSAO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_DATAENTRADASAIDA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_HORAENTRADASAIDA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TIPONOTA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TIPOFRETE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTBASEDECALCULO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTICMS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTBASEST'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTICMSST'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTVALOR_FRETE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTVALOR_SEGURO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTOUTRASDESP'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTVALORIPI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_TOTISS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_DADOSADICIONAIS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_NUMERO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_ALIQUOTAISS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_SERIE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_FORMAPAG'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_CFOP'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_NFI_IDF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_IDF'
        ParamType = ptUnknown
      end>
  end
  object ZSaidaDocumento: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateSaidaDocumento
    SQL.Strings = (
      'SELECT *'
      'FROM SAIDA_DOCUMENTO'
      'WHERE SAD_IDFDOC = :SAD_IDFDOC')
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    Left = 368
    Top = 568
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    object ZSaidaDocumentoSAD_IDFDOC: TIntegerField
      AutoGenerateValue = arAutoInc
      FieldName = 'SAD_IDFDOC'
      Required = True
    end
    object ZSaidaDocumentoSAD_DOCUME: TStringField
      FieldName = 'SAD_DOCUME'
      Required = True
      Size = 13
    end
    object ZSaidaDocumentoSAD_DATAVE: TDateField
      FieldName = 'SAD_DATAVE'
      Required = True
    end
    object ZSaidaDocumentoSAD_TIPDOC: TStringField
      FieldName = 'SAD_TIPDOC'
      Required = True
      Size = 1
    end
    object ZSaidaDocumentoSAD_CODCAI: TSmallintField
      FieldName = 'SAD_CODCAI'
      Required = True
    end
    object ZSaidaDocumentoSAD_IDFEMPRESA: TSmallintField
      FieldName = 'SAD_IDFEMPRESA'
      Required = True
    end
    object ZSaidaDocumentoSAD_CODCFO: TStringField
      FieldName = 'SAD_CODCFO'
      Size = 8
    end
    object ZSaidaDocumentoSAD_CODVEN: TStringField
      FieldName = 'SAD_CODVEN'
      Required = True
      Size = 3
    end
    object ZSaidaDocumentoSAD_ORCAME: TStringField
      FieldName = 'SAD_ORCAME'
      Size = 13
    end
    object ZSaidaDocumentoSAD_PLACA: TStringField
      FieldName = 'SAD_PLACA'
      Size = 8
    end
    object ZSaidaDocumentoSAD_KM: TIntegerField
      FieldName = 'SAD_KM'
    end
    object ZSaidaDocumentoSAD_CANCELADO: TStringField
      FieldName = 'SAD_CANCELADO'
      Required = True
      Size = 1
    end
    object ZSaidaDocumentoSAD_CODCLI: TIntegerField
      FieldName = 'SAD_CODCLI'
      Required = True
    end
    object ZSaidaDocumentoSAD_USUARIO: TStringField
      FieldName = 'SAD_USUARIO'
      Size = 3
    end
    object ZSaidaDocumentoSAD_TIPOCANCEL: TStringField
      FieldName = 'SAD_TIPOCANCEL'
      Size = 1
    end
    object ZSaidaDocumentoSAD_INTORCA: TIntegerField
      FieldName = 'SAD_INTORCA'
    end
    object ZSaidaDocumentoSAD_CUPOMSTATUS: TStringField
      FieldName = 'SAD_CUPOMSTATUS'
      Size = 3
    end
    object ZSaidaDocumentoSAD_DATAREG: TDateTimeField
      FieldName = 'SAD_DATAREG'
    end
    object ZSaidaDocumentoSAD_USUALTER: TStringField
      FieldName = 'SAD_USUALTER'
      Size = 3
    end
    object ZSaidaDocumentoSAD_DATAALTER: TDateTimeField
      FieldName = 'SAD_DATAALTER'
    end
    object ZSaidaDocumentoSAD_DESCONTO_TOTAL: TFloatField
      FieldName = 'SAD_DESCONTO_TOTAL'
    end
    object ZSaidaDocumentoSAD_NFE: TIntegerField
      FieldName = 'SAD_NFE'
    end
    object ZSaidaDocumentoSAD_TRANSFERENCIA: TStringField
      FieldName = 'SAD_TRANSFERENCIA'
      Size = 1
    end
  end
  object ZUpdateSaidaDocumento: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM SAIDA_DOCUMENTO'
      'WHERE'
      '  SAIDA_DOCUMENTO.SAD_IDFDOC = :OLD_SAD_IDFDOC')
    InsertSQL.Strings = (
      'INSERT INTO SAIDA_DOCUMENTO'
      
        '  (SAD_IDFDOC, SAD_DOCUME, SAD_DATAVE, SAD_TIPDOC, SAD_CODCAI, S' +
        'AD_IDFEMPRESA, '
      
        '   SAD_CODCFO, SAD_CODVEN, SAD_ORCAME, SAD_PLACA, SAD_KM, SAD_CA' +
        'NCELADO, '
      
        '   SAD_CODCLI, SAD_USUARIO, SAD_TIPOCANCEL, SAD_INTORCA, SAD_CUP' +
        'OMSTATUS, '
      
        '   SAD_DATAREG, SAD_USUALTER, SAD_DATAALTER, SAD_DESCONTO_TOTAL,' +
        ' SAD_NFE, '
      '   SAD_TRANSFERENCIA)'
      'VALUES'
      
        '  (:SAD_IDFDOC, :SAD_DOCUME, :SAD_DATAVE, :SAD_TIPDOC, :SAD_CODC' +
        'AI, :SAD_IDFEMPRESA, '
      
        '   :SAD_CODCFO, :SAD_CODVEN, :SAD_ORCAME, :SAD_PLACA, :SAD_KM, :' +
        'SAD_CANCELADO, '
      
        '   :SAD_CODCLI, :SAD_USUARIO, :SAD_TIPOCANCEL, :SAD_INTORCA, :SA' +
        'D_CUPOMSTATUS, '
      
        '   :SAD_DATAREG, :SAD_USUALTER, :SAD_DATAALTER, :SAD_DESCONTO_TO' +
        'TAL, :SAD_NFE, '
      '   :SAD_TRANSFERENCIA)')
    ModifySQL.Strings = (
      'UPDATE SAIDA_DOCUMENTO SET'
      '  SAD_DOCUME = :SAD_DOCUME,'
      '  SAD_DATAVE = :SAD_DATAVE,'
      '  SAD_TIPDOC = :SAD_TIPDOC,'
      '  SAD_CODCAI = :SAD_CODCAI,'
      '  SAD_IDFEMPRESA = :SAD_IDFEMPRESA,'
      '  SAD_CODCFO = :SAD_CODCFO,'
      '  SAD_CODVEN = :SAD_CODVEN,'
      '  SAD_ORCAME = :SAD_ORCAME,'
      '  SAD_PLACA = :SAD_PLACA,'
      '  SAD_KM = :SAD_KM,'
      '  SAD_CANCELADO = :SAD_CANCELADO,'
      '  SAD_CODCLI = :SAD_CODCLI,'
      '  SAD_USUARIO = :SAD_USUARIO,'
      '  SAD_TIPOCANCEL = :SAD_TIPOCANCEL,'
      '  SAD_INTORCA = :SAD_INTORCA,'
      '  SAD_CUPOMSTATUS = :SAD_CUPOMSTATUS,'
      '  SAD_DATAREG = :SAD_DATAREG,'
      '  SAD_USUALTER = :SAD_USUALTER,'
      '  SAD_DATAALTER = :SAD_DATAALTER,'
      '  SAD_DESCONTO_TOTAL = :SAD_DESCONTO_TOTAL,'
      '  SAD_NFE = :SAD_NFE,'
      '  SAD_TRANSFERENCIA = :SAD_TRANSFERENCIA'
      'WHERE'
      '  SAIDA_DOCUMENTO.SAD_IDFDOC = :OLD_SAD_IDFDOC')
    UseSequenceFieldForRefreshSQL = False
    Left = 488
    Top = 568
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'SAD_DOCUME'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_DATAVE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_TIPDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CODCAI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_IDFEMPRESA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CODCFO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CODVEN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_ORCAME'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_PLACA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_KM'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CANCELADO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CODCLI'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_USUARIO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_TIPOCANCEL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_INTORCA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_CUPOMSTATUS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_DATAREG'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_USUALTER'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_DATAALTER'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_DESCONTO_TOTAL'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_NFE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_TRANSFERENCIA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_SAD_IDFDOC'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
  end
  object DSP_SAIDA_DOCUMENTO: TDataSetProvider
    DataSet = ZSaidaDocumento
    Options = [poPropogateChanges]
    Left = 224
    Top = 568
  end
  object CDS_SAIDA_DOCUMENTO: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'SAD_IDFDOC'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_SAIDA_DOCUMENTO'
    AfterOpen = CDS_SAIDA_DOCUMENTOAfterOpen
    BeforeClose = CDS_SAIDA_DOCUMENTOBeforeClose
    OnNewRecord = CDS_SAIDA_DOCUMENTONewRecord
    AfterApplyUpdates = CDS_SAIDA_DOCUMENTOAfterApplyUpdates
    Left = 80
    Top = 568
    object CDS_SAIDA_DOCUMENTOSAD_IDFDOC: TIntegerField
      AutoGenerateValue = arAutoInc
      FieldName = 'SAD_IDFDOC'
      Required = True
    end
    object CDS_SAIDA_DOCUMENTOSAD_DOCUME: TStringField
      FieldName = 'SAD_DOCUME'
      Required = True
      Size = 13
    end
    object CDS_SAIDA_DOCUMENTOSAD_DATAVE: TDateField
      FieldName = 'SAD_DATAVE'
      Required = True
    end
    object CDS_SAIDA_DOCUMENTOSAD_TIPDOC: TStringField
      FieldName = 'SAD_TIPDOC'
      Required = True
      Size = 1
    end
    object CDS_SAIDA_DOCUMENTOSAD_CODCAI: TSmallintField
      FieldName = 'SAD_CODCAI'
      Required = True
    end
    object CDS_SAIDA_DOCUMENTOSAD_IDFEMPRESA: TSmallintField
      FieldName = 'SAD_IDFEMPRESA'
      Required = True
    end
    object CDS_SAIDA_DOCUMENTOSAD_CODCFO: TStringField
      FieldName = 'SAD_CODCFO'
      Size = 8
    end
    object CDS_SAIDA_DOCUMENTOSAD_CODVEN: TStringField
      FieldName = 'SAD_CODVEN'
      Required = True
      Size = 3
    end
    object CDS_SAIDA_DOCUMENTOSAD_ORCAME: TStringField
      FieldName = 'SAD_ORCAME'
      Size = 13
    end
    object CDS_SAIDA_DOCUMENTOSAD_PLACA: TStringField
      FieldName = 'SAD_PLACA'
      Size = 8
    end
    object CDS_SAIDA_DOCUMENTOSAD_KM: TIntegerField
      FieldName = 'SAD_KM'
    end
    object CDS_SAIDA_DOCUMENTOSAD_CANCELADO: TStringField
      FieldName = 'SAD_CANCELADO'
      Required = True
      Size = 1
    end
    object CDS_SAIDA_DOCUMENTOSAD_CODCLI: TIntegerField
      FieldName = 'SAD_CODCLI'
      Required = True
    end
    object CDS_SAIDA_DOCUMENTOSAD_USUARIO: TStringField
      FieldName = 'SAD_USUARIO'
      Size = 3
    end
    object CDS_SAIDA_DOCUMENTOSAD_TIPOCANCEL: TStringField
      FieldName = 'SAD_TIPOCANCEL'
      Size = 1
    end
    object CDS_SAIDA_DOCUMENTOSAD_INTORCA: TIntegerField
      FieldName = 'SAD_INTORCA'
    end
    object CDS_SAIDA_DOCUMENTOSAD_CUPOMSTATUS: TStringField
      FieldName = 'SAD_CUPOMSTATUS'
      Size = 3
    end
    object CDS_SAIDA_DOCUMENTOSAD_DATAREG: TDateTimeField
      FieldName = 'SAD_DATAREG'
    end
    object CDS_SAIDA_DOCUMENTOSAD_USUALTER: TStringField
      FieldName = 'SAD_USUALTER'
      Size = 3
    end
    object CDS_SAIDA_DOCUMENTOSAD_DATAALTER: TDateTimeField
      FieldName = 'SAD_DATAALTER'
    end
    object CDS_SAIDA_DOCUMENTOSAD_DESCONTO_TOTAL: TFloatField
      FieldName = 'SAD_DESCONTO_TOTAL'
    end
    object CDS_SAIDA_DOCUMENTOSAD_NFE: TIntegerField
      FieldName = 'SAD_NFE'
    end
    object CDS_SAIDA_DOCUMENTOSAD_TRANSFERENCIA: TStringField
      FieldName = 'SAD_TRANSFERENCIA'
      ProviderFlags = [pfInUpdate]
      Size = 1
    end
  end
  object CDS_UNIDADE: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'DSP_UNIDADE'
    Left = 80
    Top = 168
    object CDS_UNIDADEUNI_CODIGO: TStringField
      FieldName = 'UNI_CODIGO'
      Required = True
      Size = 3
    end
    object CDS_UNIDADEUNI_DESCRICAO: TStringField
      FieldName = 'UNI_DESCRICAO'
      Required = True
      Size = 30
    end
  end
  object DSP_UNIDADE: TDataSetProvider
    DataSet = ZUnidade
    Left = 232
    Top = 168
  end
  object ZUnidade: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    SQL.Strings = (
      'SELECT * FROM UNIDADE')
    Params = <>
    Left = 384
    Top = 168
  end
  object ZSQLConsulta: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    Params = <>
    Left = 464
    Top = 176
  end
  object CDS_PRODUTO_SIMILAR: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'PRR_ID'
    Params = <
      item
        DataType = ftInteger
        Name = 'PRS_PRODUTO'
        ParamType = ptInput
        Value = 0
      end>
    ProviderName = 'DSP_PRODUTO_SIMILAR'
    Left = 776
    Top = 16
    object CDS_PRODUTO_SIMILARPRR_ID: TIntegerField
      FieldName = 'PRR_ID'
      Required = True
    end
    object CDS_PRODUTO_SIMILARPRS_PRODUTO: TIntegerField
      FieldName = 'PRS_PRODUTO'
      ProviderFlags = [pfInWhere, pfInKey]
      Required = True
    end
    object CDS_PRODUTO_SIMILARTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
  end
  object CDS_PRODUTO_REFERENCIA: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'PRR_ID'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_PRODUTO_REFERENCIA'
    Left = 608
    Top = 16
    object CDS_PRODUTO_REFERENCIAPRR_ID: TIntegerField
      FieldName = 'PRR_ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object CDS_PRODUTO_REFERENCIAPRR_PRODUTOIDF: TIntegerField
      FieldName = 'PRR_PRODUTOIDF'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object CDS_PRODUTO_REFERENCIAPRR_NOME_REF: TStringField
      FieldName = 'PRR_NOME_REF'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Size = 30
    end
  end
  object DSP_PRODUTO_REFERENCIA: TDataSetProvider
    DataSet = ZQryPRODUTO_REFERENCIA
    Options = [poFetchDetailsOnDemand, poCascadeDeletes, poCascadeUpdates, poAutoRefresh]
    UpdateMode = upWhereKeyOnly
    Left = 608
    Top = 64
  end
  object DSP_PRODUTO_SIMILAR: TDataSetProvider
    DataSet = ZQryPRODUTO_SIMILAR
    Options = [poCascadeDeletes, poCascadeUpdates, poAutoRefresh]
    UpdateMode = upWhereKeyOnly
    Left = 776
    Top = 64
  end
  object ZQryPRODUTO_REFERENCIA: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdatePRODUTO_REFERENCIA
    SQL.Strings = (
      'SELECT * FROM PRODUTO_REFERENCIA WHERE PRR_ID = :PRR_ID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'PRR_ID'
        ParamType = ptUnknown
      end>
    Left = 608
    Top = 112
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'PRR_ID'
        ParamType = ptUnknown
      end>
    object ZQryPRODUTO_REFERENCIAPRR_ID: TIntegerField
      FieldName = 'PRR_ID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object ZQryPRODUTO_REFERENCIAPRR_PRODUTOIDF: TIntegerField
      FieldName = 'PRR_PRODUTOIDF'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object ZQryPRODUTO_REFERENCIAPRR_NOME_REF: TStringField
      FieldName = 'PRR_NOME_REF'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Size = 30
    end
  end
  object ZQryPRODUTO_SIMILAR: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdatePRODUTO_SIMILAR
    SQL.Strings = (
      
        'SELECT * FROM PRODUTOS_SIMILARES WHERE PRS_PRODUTO = :PRS_PRODUT' +
        'O')
    Params = <
      item
        DataType = ftInterface
        Name = 'PRS_PRODUTO'
        ParamType = ptInput
        Value = 0
      end>
    Left = 776
    Top = 112
    ParamData = <
      item
        DataType = ftInterface
        Name = 'PRS_PRODUTO'
        ParamType = ptInput
        Value = 0
      end>
    object ZQryPRODUTO_SIMILARPRR_ID: TIntegerField
      FieldName = 'PRR_ID'
      Required = True
    end
    object ZQryPRODUTO_SIMILARPRS_PRODUTO: TIntegerField
      FieldName = 'PRS_PRODUTO'
      ProviderFlags = [pfInWhere, pfInKey]
      Required = True
    end
    object ZQryPRODUTO_SIMILARTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
  end
  object ZUpdatePRODUTO_REFERENCIA: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM PRODUTO_REFERENCIA'
      'WHERE'
      '  PRODUTO_REFERENCIA.PRR_ID = :OLD_PRR_ID')
    InsertSQL.Strings = (
      'INSERT INTO PRODUTO_REFERENCIA'
      '  ( PRR_ID, PRR_PRODUTOIDF, PRR_NOME_REF)'
      'VALUES'
      '  (:PRR_ID, :PRR_PRODUTOIDF, :PRR_NOME_REF)')
    ModifySQL.Strings = (
      'UPDATE PRODUTO_REFERENCIA SET'
      '  PRR_PRODUTOIDF = :PRR_PRODUTOIDF,'
      '  PRR_NOME_REF = :PRR_NOME_REF'
      'WHERE'
      '  PRODUTO_REFERENCIA.PRR_ID = :OLD_PRR_ID')
    UseSequenceFieldForRefreshSQL = False
    Left = 608
    Top = 160
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'PRR_PRODUTOIDF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'PRR_NOME_REF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_PRR_ID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'PRR_ID'
        ParamType = ptUnknown
      end>
  end
  object ZUpdatePRODUTO_SIMILAR: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM PRODUTOS_SIMILARES'
      'WHERE'
      '  PRODUTOS_SIMILARES.PRS_PRODUTO = :OLD_PRS_PRODUTO')
    InsertSQL.Strings = (
      'INSERT INTO PRODUTOS_SIMILARES'
      '  (PRR_ID, PRS_PRODUTO, TIPO)'
      'VALUES'
      '  (:PRR_ID, :PRS_PRODUTO, :TIPO)')
    ModifySQL.Strings = (
      'UPDATE PRODUTOS_SIMILARES SET'
      '  PRR_ID = :PRR_ID,'
      '  PRS_PRODUTO = :PRS_PRODUTO,'
      '  TIPO = :TIPO'
      'WHERE'
      '  PRODUTOS_SIMILARES.PRS_PRODUTO = :OLD_PRS_PRODUTO')
    UseSequenceFieldForRefreshSQL = False
    Left = 776
    Top = 160
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'PRR_ID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'PRS_PRODUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'TIPO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_PRS_PRODUTO'
        ParamType = ptUnknown
      end>
  end
  object ZRO_NFE: TZReadOnlyQuery
    Connection = DtmGeral.ZConexaoBanco
    Params = <>
    Left = 600
    Top = 232
  end
  object CDS_NOTAS_TRANSPORTE: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftUnknown
        Name = 'NFI_IDF'
        ParamType = ptUnknown
      end>
    ProviderName = 'DSP_NOTAS_TRANSPORTE'
    Left = 776
    Top = 216
    object CDS_NOTAS_TRANSPORTENFI_IDF: TIntegerField
      FieldName = 'NFI_IDF'
      Required = True
    end
    object CDS_NOTAS_TRANSPORTENFT_PLACA: TStringField
      FieldName = 'NFT_PLACA'
      Size = 7
    end
    object CDS_NOTAS_TRANSPORTENFT_UFPLACA: TStringField
      FieldName = 'NFT_UFPLACA'
      Size = 2
    end
    object CDS_NOTAS_TRANSPORTENFT_QUANTIDADE: TStringField
      FieldName = 'NFT_QUANTIDADE'
    end
    object CDS_NOTAS_TRANSPORTENFT_ESPECIE: TStringField
      FieldName = 'NFT_ESPECIE'
    end
    object CDS_NOTAS_TRANSPORTENFT_MARCA: TStringField
      FieldName = 'NFT_MARCA'
    end
    object CDS_NOTAS_TRANSPORTENFT_NUMERO: TStringField
      FieldName = 'NFT_NUMERO'
    end
    object CDS_NOTAS_TRANSPORTENFT_PESOBRUTO: TStringField
      FieldName = 'NFT_PESOBRUTO'
    end
    object CDS_NOTAS_TRANSPORTENFT_PESOLIQUIDO: TStringField
      FieldName = 'NFT_PESOLIQUIDO'
    end
    object CDS_NOTAS_TRANSPORTENFT_TRANSPORTE: TIntegerField
      FieldName = 'NFT_TRANSPORTE'
    end
  end
  object DSP_NOTAS_TRANSPORTE: TDataSetProvider
    DataSet = ZQryNOTAS_TRANSPORTE
    Left = 776
    Top = 264
  end
  object ZQryNOTAS_TRANSPORTE: TZQuery
    Connection = DtmGeral.ZConexaoBanco
    UpdateObject = ZUpdateNOTAS_TRANSPORTE
    SQL.Strings = (
      'SELECT * '
      'FROM NOTAS_FISCAIS_TRANSPORTE'
      'WHERE NFI_IDF = :NFI_IDF')
    Params = <
      item
        DataType = ftUnknown
        Name = 'NFI_IDF'
        ParamType = ptUnknown
      end>
    Left = 776
    Top = 312
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NFI_IDF'
        ParamType = ptUnknown
      end>
    object ZQryNOTAS_TRANSPORTENFI_IDF: TIntegerField
      FieldName = 'NFI_IDF'
      Required = True
    end
    object ZQryNOTAS_TRANSPORTENFT_PLACA: TStringField
      FieldName = 'NFT_PLACA'
      Size = 7
    end
    object ZQryNOTAS_TRANSPORTENFT_UFPLACA: TStringField
      FieldName = 'NFT_UFPLACA'
      Size = 2
    end
    object ZQryNOTAS_TRANSPORTENFT_QUANTIDADE: TStringField
      FieldName = 'NFT_QUANTIDADE'
    end
    object ZQryNOTAS_TRANSPORTENFT_ESPECIE: TStringField
      FieldName = 'NFT_ESPECIE'
    end
    object ZQryNOTAS_TRANSPORTENFT_MARCA: TStringField
      FieldName = 'NFT_MARCA'
    end
    object ZQryNOTAS_TRANSPORTENFT_NUMERO: TStringField
      FieldName = 'NFT_NUMERO'
    end
    object ZQryNOTAS_TRANSPORTENFT_PESOBRUTO: TStringField
      FieldName = 'NFT_PESOBRUTO'
    end
    object ZQryNOTAS_TRANSPORTENFT_PESOLIQUIDO: TStringField
      FieldName = 'NFT_PESOLIQUIDO'
    end
    object ZQryNOTAS_TRANSPORTENFT_TRANSPORTE: TIntegerField
      FieldName = 'NFT_TRANSPORTE'
    end
  end
  object ZUpdateNOTAS_TRANSPORTE: TZUpdateSQL
    DeleteSQL.Strings = (
      'DELETE FROM NOTAS_FISCAIS_TRANSPORTE'
      'WHERE'
      '  NOTAS_FISCAIS_TRANSPORTE.NFI_IDF = :OLD_NFI_IDF')
    InsertSQL.Strings = (
      'INSERT INTO NOTAS_FISCAIS_TRANSPORTE'
      '  (NFI_IDF, NFT_PLACA, NFT_UFPLACA, NFT_QUANTIDADE, '
      'NFT_ESPECIE, NFT_MARCA, '
      '   NFT_NUMERO, NFT_PESOBRUTO, NFT_PESOLIQUIDO, '
      'NFT_TRANSPORTE)'
      'VALUES'
      '  (:NFI_IDF, :NFT_PLACA, :NFT_UFPLACA, :NFT_QUANTIDADE, '
      ':NFT_ESPECIE, :NFT_MARCA, '
      '   :NFT_NUMERO, :NFT_PESOBRUTO, :NFT_PESOLIQUIDO, '
      ':NFT_TRANSPORTE)')
    ModifySQL.Strings = (
      'UPDATE NOTAS_FISCAIS_TRANSPORTE SET'
      '  NFT_PLACA = :NFT_PLACA,'
      '  NFT_UFPLACA = :NFT_UFPLACA,'
      '  NFT_QUANTIDADE = :NFT_QUANTIDADE,'
      '  NFT_ESPECIE = :NFT_ESPECIE,'
      '  NFT_MARCA = :NFT_MARCA,'
      '  NFT_NUMERO = :NFT_NUMERO,'
      '  NFT_PESOBRUTO = :NFT_PESOBRUTO,'
      '  NFT_PESOLIQUIDO = :NFT_PESOLIQUIDO,'
      '  NFT_TRANSPORTE = :NFT_TRANSPORTE'
      'WHERE'
      '  NOTAS_FISCAIS_TRANSPORTE.NFI_IDF = :OLD_NFI_IDF')
    UseSequenceFieldForRefreshSQL = False
    Left = 776
    Top = 360
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NFT_PLACA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_UFPLACA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_QUANTIDADE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_ESPECIE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_MARCA'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_NUMERO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_PESOBRUTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_PESOLIQUIDO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFT_TRANSPORTE'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'OLD_NFI_IDF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NFI_IDF'
        ParamType = ptUnknown
      end>
  end
end
